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MaI<es Paperwork PANdEMONiuM VANish 



MAGIC WINDOW II turns your APPLE in- 
to a sophisticated word processor. But 
because MAGIC WINDOW II operates so 
much like a standard typewriter, it's ex- 
tremely simple to use. In fact, because of 
its unique menu structure, it's the easiest 
to learn, and function selection is virtually 
error free. 

MAGIC WINDOW ll's powerful word pro- 
cessing features include automatic format- 
ting, editing, centering, and justification — 
and these are all done easily "on the video 
screen" before you ever print. Just type 
your first draft quickly, then go back and 
make any needed corrections. You can in- 
sert or delete letters or words, even move 
"'""'i paragraphs with just a few simple 
keystrokes. 

And MAGIC WINDOW II can support 40-, 
70-, and 80-column displays, as well as 
automatically providing 80-column visibility 
with scrolling. The rule is: What you see on 
the screen is what you get in print. No word 
processor on the market has both the 
features of MAGIC WINDOW II and its 
simplicity of use. 



And as an extra assurance that your 
document is perfect before printing and 
mailing, you can use MAGIC WORDS. 
With incredible speed, MAGIC WORDS 
proofreads your document for spelling er- 
rors and typos, shows you each one in con- 
text on the screen, and allows you to cor- 
rect or ignore each in sequence. Unlike any 
other spelling checker, it will then auto- 
matically create a corrected file as you go 
so you never need to return to MAGIC WIN- 
DOW II to update it yourself manually. Or. 
if you're busy. MAGIC WORDS will go 
through your file without waiting for you to 
act on each error, and provide you with a 
printout of the errors and their locations so 
you can correct them at your convenience. 

And with a 14,000-word basic dictionary 
and plenty of memory for you to add 
technical terms or customer names that 



can catch all your spelling errors and typos. 

But now comes the mailing, the really 
time-consuming part — unless you have 
MAGIC MAILER. A mailing list merge 



system. MAGIC MAILER lets you insert 
each name and address (or whatever is in 
your records) into your document quickly 
and efficiently. 

With MAGIC MAILER, you never have to 
retype a document or an internal address. 
With just a few keystrokes, each letter 
becomes an original, and the final phase 
of the paperwork process is complete — 
efficiently and to perfection. 

Let's face it: The letters, invoices, and 
other documents you send out represent 
you to the public. They should be as pro- 
fessional as possible — and they can be. 
All it takes is a little MAGIC 



tacn program is available separately or 
ask your local software store for Artsci' 
MAGIC PAK. All three products-are included 
in an attractive librarv box. 



9 8 5-2922 



tirlsci. 



2MHZ 6809 SYSTEMS 

GIMIX offers you a variety to choose from! 
38 MB WINCHESTER SYSTEM $17,498.99 




DMA Double Density Floppy Disk Controller 
Dual 8" DSDD Floppy Disk System 
Dual Winchester Subsystem with 
Two19 MB 5 1 /4" Winchester Drives 

OS-9 Text Editor 
OS-9 Assembler 



• 4 RS232C Serial Ports 

• 1MB 5 1 /»" Floppy Disk Drive 

• DMA Double Density Floppy Disk Controller 



HARDWARE FEATURES: 

• 2MHz 6809 CPU • 

• 512KB Static RAM • 

• 8 RS232C Serial Ports * 

• 2 Parallel Ports 
SOFTWARE FEATURES: 

• OS-9 LEVEL TWO Multi-User • 
Operating System • 

• OS-9 Debugger 

19 MB WINCHESTER SYSTEM $8998.09 

HARDWARE FEATURES: 

• 128K Static Ram 

• 2MHz 6809 CPU 

• 19 MB 5 1 /4 " Winchester DMA Subsystem 
SOFTWARE FEATURES: 

• OS-9 LEVEL TWO Multi-User 
Operating System 

• OS-9 Text Editor 

128KB MULTI-USER SYSTEM $6997.39 

HARDWARE FEATURES: 

• 2MHZ6809 CPU 

• DMA Double Density Floppy Disk Controller 

• 128KB Static Ram 

SOFTWARE FEATURES: Your choice of either UniFLEX or OS-9 LEVEL TWO. Both are Unix-like 
Multi-User/Multi-Tasking Operating Systems. 

56KB FLEX/OS-9 "SWITCHING" SYSTEM $4148.49 

HARDWARE FEATURES: 

• 2MHz 6809 CPU • 

• 56K Static Ram • 

• 2 RS232C Serial Ports 
SOFTWARE FEATURES: 

• GMXBUG monitor — FLEX Disk Operating System 

• OS-9 LEVEL ONE Multi-tasking operating system for up to 56K of memory 



• OS-9 Debugger 

• OS-9 Assembler 



• 2 RS232C Serial Ports 

• Dual 8" DSDD Floppy Disk System 



DMA Double Density Floppy Disk Controller 

2 Built-in 5Va" 40tr DSDD Disk Drives 

(80 Track DSDD Drive Option . . add $400.00) 



WINCHESTER SUBSYSTEMS 



Winchester packages are available for upgrading current GIMIX 6809 systems equipped with DMA controllers, at least one 
floppy disk drive, and running FLEX, OS-9 LEVEL ONE or OS-9 LEVEL TWO. The packages include one or two 19MB (unformat- 
ted) Winchester drives, DMA Hard Disk Interface, and the appropriate software drivers. The Interface can handle two 5Va" 
Winchester Drives, providing Automatic Data Error Detection and Correction: up to 22 bit burst error detection and 11 bit burst 
error correction. 

Dual drives can be used together to provide over 30 MBytes of on line storage -- or use one for back-up of the other. (More 
convenient and reliable than tape backup systems. 

#90 includes one 19MB Drive, Interface, and Software $4288.90 

#91 includes two 19MB Drives, Interface, and Software $6688.91 

Contact GIMIX for systems customized to your needs or for more information. 
50 HZ Export Versions Available 



GIMIX Inc. reserves the right to change pricing and product 
specifications at any time without further notice. 

GIMIX® and GHOST® are registered trademarks of GIMIX Inc. 

FLEX and UniFLEX are trademarks of Technical Systems Consultants Inc. 

OS-9 is a trademark of Microware Inc. 



1337 WEST 37th PLACE 

CHICAGO, ILLINOIS 60609 

(312)927-5510 

TWX 910-221-4055 



Gimix 



inc. 



1982 GIMIX Inc. 



THE SKILLS ; ¥Dtf IS). 
TO MASTER YOUR MICRO 

IN A FRIENDLY, SELF-PACED FORMAT- 
FROMWILEY 



BASIC FOR THE APPLE II® 

Jerald R. Brown, LeRoy Finkel, & Bob Albrecht 
A complete, friendly, and virtually guaranteed in- 
troduction to BASIC programming on the Apple 
II®— from fundamental principles, assignment 
statements, and stored programs to such ad- 
vanced techniques as string variables and func- 
tions, subscripted variables, subroutines, and 
more. 

(1-86596-6) October 1982 
416 pp. $12.95 

ATARI® SOUND AND GRAPHICS 

Herb Moore, Judy Lower, & Bob Albrecht 
Learn how to compose and play melodies, draw 
cartoons, create games, and combine animation 
and sound— even if you have no previous comput- 
ing experience. 
(1-09593-1) 1982 234 pp. $9.95 

TRS-80™ COLOR BASIC 

Bob Albrecht 

Packed with games, experiments, and program- 
ming problems and solutions, this manual lets you 
explore all the applications of the TRS-80™ Color 
Computer, while it teaches you the fundamentals 
of BASIC programming. 
(1-09644-X) 1982 374 pp. $9.95 



6502 ASSEMBLY LANGUAGE PROGRAMMING 

Judi N. Fernandez, Donna N. Tabler, & Ruth Ashley 
Puts the speed and efficiency of assembly lan- 
guage programming within reach of owners of 
APPLES®, ATARIs®, Commodores, or any of the 
popular microcomputers based on the 6502 mi- 
croprocessor chip. 
(1-86120-0) October 1982 
approx. 256 pp. $12.95 

GOLDEN DELICIOUS GAMES FOR THE 
APPLE® COMPUTER 

Howard M. Franklin, JoAnne Koltnow, 
& LeRoy Finkel 

This delightful guide shows novice and experi- 
enced programmers how to use the color, sound, 
and graphic capabilities of the Apple II® to create 
their own computer games. 
(1-09083-2) 1982 150 pp. $12.95 

More than a million people have learned to pro- 
gram, use, and enjoy microcomputers with Wiley 
Self-Teaching Guides. Look for them all at your 
favorite bookshop or computer store. 

ff** JOHN WILEY & SONS, Inc. 
^7(W)i982 605 Third Avenue 

-W- New York, NY. 10158 
In Canada: 22 Worcester Road, Rexdale, Ontario M9W 1 U 
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Apple" and Apple //• are registered trademarks of Apple Computer, Inc. 
Atari* is a registered trademark of Atari, Inc. 
TRS-80™ is a trademark of Tandy Corp. 
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November Highlights 

Games Feature 

This month we expand a bit from our usual content and of- 
fer an array of games for a wide variety of computers. 
Although we don't usually publish games, we feel that 
they may be valuable, particularly where they demon- 
strate techniques or cultivate a skill in the user. Instead of 
making games a regular part of MICRO, we prefer to do it 
all at once! 

There are specific games for nearly every computer, in- 
cluding the PET, VIC, Apple, CIP/Superboard, Atari 400/ 
800, and the SYM.-In addition, you will find that most can 
be converted easily to run on even more machines. These 
represent a variety of types of games too — from action 
games like "Space Invasion" and "Shootdown," to 
strategy games like "Number Shuffle, " "GOMOKU," and 
"23 Matches," to "Castle Adventure." 

Written in the style of Scott Adams' famous games, 
"Castle Adventure" (p. 41) tests your memory and 
analytical skills. You will find yourself in the evil baron's 
castle in a quest for treasure and the kidnapped princess. 
"Castle Adventure" was originally written for the PET. 
We have provided specific line changes to make it run on 
the Apple. However, except for disk commands, it is writ- 
ten in straight Microsoft BASIC, so owners of OSI, Atari 
(with Microsoft BASIC), and Color Computer |with ex- 
tended BASIC) machines should be able to easily adapt 
"Castle Adventure." 

"Solve the Pagoda Puzzle Using Recursive Assembly" 
(p. 53) is particularly interesting because it demonstrates a 
technique — having a subroutine call itself — that you 
may want to apply to your own programs. The author's ap- 
plication is in solving the "Pagoda" or "Tower of Hanoi" 
puzzle. The program solves the puzzle for a stack of disks 
of any practical height and outputs a list of specific moves. 
With a minimum of changes, it will run on any 6502 com- 
puter. You may want to try incorporating this routine into 
a BASIC program that actually shows the disks being moved 
from peg to peg. 

"GOMOKU" (p. 59) is a fast, machine-language ver- 
sion of the oriental game of strategy. It is presented here 
for VIC, with modifications for PET. "Number Shuffle" is 
an Atari computer version of "Magic Square," the game 
where you slide the little numbered squares around until 
you get them in order. "Space Invasion," for the C1P/ 
Superboard and "Shootdown" are arcade-style action 
games. Finally, "23 Matches' ' is a short machine-language 
game for the SYM. It makes ingenious use of the SYM's 
LCD display. 

This month's editorial (p. 7) offers some thoughts on 
games and their place in MICRO and in our society. 

68000 Coverage Continues 

Preliminary results from our survey indicate that a lot 
of you are interested in the 68000. As part of our continu- 
ing effort to keep you informed on this powerful new pro- 



cessor, we present two articles this month on the 68000. 
Dr. Hootman's detailed discussion of the 68000 instruc- 
tion set continues (p. 27] with the binary arithmetic opera- 
tions. Handy reference tables are included. Jelemensky 
and Whiteside (p. 13) conclude their demonstration of 
68000 programming techniques. 

We haven't seen any games yet for the 68000. Is it 
because its users haven't gotten over the speed and power? 
Or is it because these machines aren't finding their way in- 
to very many homes? 

Atari Coverage Takes Off 

With the addition of Contributing Editor Paul Swanson 
to our staff, MICRO'S Atari coverage has improved con- 
siderably. Paul's column, a new "From Here to Atari" (p. 
103), starts this month. In addition, he continues his 
character graphics article series with a discussion of fine 
scrolling (p. 82). This month's data sheet (p. 109 — com- 
piled by Paul Swanson) is a handy reference for serious 
Atari programmers. 

Atari users will be interested in programming extra col- 
ors, even in the limited high-resolution modes. Richard 
and Donna Marmon (p. 96) illustrate two techniques — 
one that uses adjacent color dots, and one that quickly 
alternates displays. 

Hardware 

In keeping with our lighter theme in this issue, the 
hardware articles we present are simple, single-evening 
projects. All involve modifications of existing equipment. 
Ralph Tenny (p. 19) shows how to get a high-quality pic- 
ture from your color computer using a monitor instead of a 
TV. A monitor requires a composite video signal, not 
available on the CC, and the author shows you how to add 
it. Jim Strasma (p. 35) shows how to take Commodore's 
cheapest model PET and convert it into a machine with 
80-column business capabilities, yet with all the graphic 
characters still available from the keyboard. OSI owners 
can now use Atari's inexpensive joysticks with their 
machines. Joseph Ennis (p. 9) shows how to make the sim- 
ple changes in your computer board. 

Graphics for the Apple 

For those interested in improving their game and graphic 
programming skills, our graphics articles for Atari and Ap- 
ple will help. Apple programmers will learn about 3-D ro- 
tation from Chris Williams (p. 99] . If you have done much 
graphics programming on the Apple, you have probably 
been annoyed by the unfortunate location of the graphics 
pages. Authors Bems (p. 93) and Weston (p. 79) present a 
number of techniques to circumvent this problem. 

New Color Computer Column Expands 
6809 Coverage 

John Steiner's new monthly column "CoCo Bits" 
covers the 6809-based TRS-80 Color Computer (p. 38). 
This month he discusses some problems associated with 
transferring cassette programs to disk and presents a short 
program to move the game "BEDLAM." Also for the 
Color Computer owner, Ron Anderson discusses FLEX09 
(p. 23) as it is implemented by Frank Hogg Laboratories. 
FLEX is a universal operating system that opens up a wide 
range of software for the 6800 and 6809 to the Color Com- 
puter owner. 4MCAO 
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Emulates these terminals exactl y. 



IBM 3101 

DEC VT100, VT52 

Data General D200 

ADDS Regent 20, 25, 40 

Hazertine 1400, 1410, 1500 

LearSieglerADM-3A,AOM-5 

TeleVideo 910 

Teletype Model 33 KSR 



Apple is a trademark of 
Apple Computer, Inc. 



BREAK 

CATALOG 

CHAIN 

CONFIGURE 

CONNECT 

CONVERSE 

DIAL 

END 

HANGUP 

LOG 

MONITOR 

NOLOG 

ONERR 

PAUSE 

PROMPT 

RECEIVE 

REMARK 

RETRIES 

SEND 

SPECIAL 

SPEED 

TIMEOUT 

XMITrWAIT 




Supports these 
interface boards. 



Your host 
won't know the difference! 

Softerm provides an exact terminal emulation 
for a wide range of CRT terminals which interface 
to a variety of host computer systems. Special 
function keys, sophisticated editing features, 
even local printer capabilities of the terminals 
emulated by Softerm are fully supported. Softerm 
operates with even the most discriminating host 
computer applications including video editors. 
And at speeds up to 9600 baud using either a 
direct connection or any standard communi- 
cations modem. 

Unmatched file transfer capability 

Softerm offers file transfer methods flexible 
enough to match any host computer requirement. 
These include character protocol with user- 
definable terminator and acknowledge strings, 
block size, and character echo wait, and the 
intelligent Softrans™ protocol which provides 
reliable error-free transmission and reception of 
data. The character protocol provides maximum 
flexibility for text file transfers. Any type file 
may be transferred using the Softrans protocol 
which provides automatic binary encoding and 
decoding, block checking with error recovery, and 
data compression to enhance line utilization. 
A FORTRAN 77 source program is supplied with 
Softerm which is easily adaptable to any host 



computer to allbwt _ 

with Softerm using the Softrans pro 

Softerm file transfer utilizes an easy to use 
command language which allows simple defini- 
tion of even complex multiple-file transfers with 
handshaking. Twenty-three high-level commands 
include DIAL, CATALOG, SEND, RECEIVE, 
ONERR, HANGUP, MONITOR and others which 
may be executed in immediate command mode 
interactively or from a file transfer macro com- 
mand file which has been previously entered 
and saved on disk. 

Built-in utilities 

Softerm disk utilities allow DOS commands such 
as CATALOG, INIT, RENAME, and DELETE to be 
executed allowing convenient file maintenance. 
Local file transfers allow files to be displayed, 
printed, or even copied to another file without 
exiting the Softerm program. Numerous editing 
options such as tab expansion and space com- 
pression are provided to allow easy reformatting 
of data to accommodate the variations in data 
formats used by host computers. Softerm sup- 
ports automatic dialing in both terminal and file 
transfer modes. Dial utilities allow a phone book 
of frequently used numbers to be defined which 
are accessed by a user-assignable name and 



1 Apple Communications Card 

Apple Parallel Printer 

Apple Serial Interface 

Apple Super Serial Card 

Bit 3 DuahComm Plus™ 

CCS 7710, 7720, 7728 

Hayes Micromodem I 

Smartmodem™ 300, & 1200 

Intra Computer PSIO 

Novation Apple-Cat II™ 300 & 1200 

Orange Micro Grappler™ 

SSM ASIO, APIO, AIO, AIO ll M 

upports your 80-column hardware. 

ALS Smarterm™ 

Bit 3 Full-view 80 ™ 

Computer Stop Omnivision™ 

M&R Sup'R'Terminar 

STB Systems STB-80™ 

Videx Videoterm™ 

Vista Computer Vision 80™ 

Wosper Micro Wizard 80™ 

specify the serial interface parameters 
to be used. 

Online Update Service 

The Softronics Online Update Service is pro- 
vided as an additional support service at no 
additional cost to Softerm users. Its purpose 
is to allow fast turnaround of Softerm program 
fixes for user-reported problems using the 
automatic patch facility included in Softerm 
as well as a convenient distribution method for 
additional terminal emulations and I/O drivers 
which become available. User correspondence 
can be electronically mailed to Softronics, and 
user-contributed 'keyboard macros, file transfer 
macros, and host adaptations of the Softrans 
FORTRAN 77 program are available on-line. 

Most advanced communications 
software available 

Just check Softerm's 300 page user manual. 
You simply can't buy a more sophisticated 
package or one that's easier to use. Available 
now for only $150 from your local dealer or 
Softronics, Inc. 

SOFTRONICS 

6626 Prince Edward, Memphis, TN 38119.901-755-5006 
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EXPANSION 




Tired of trying to run your word processor or your DMB on an 
OSI 64 character video screen? Now there's the SEB-3, THE 
most versatile 80x24 video board anywhere is available for OSI 
48 pin BUSS systems. No longer will you have to consider con- 
verting your video-based system to a serial terminal because 
you've found 64 characters stifling for serious business use. 
Nor need you give up compatibility with any existing graphics 
software because the SEB-3 allows you to choose ANY screen 
format up to 80x24 including 32x32 and 64x32. Since the 
SEB-3's screen format can be changed at any time under soft- 
ware control, even gaming displays can benefit from screens 
custom tailored to the game itself. The SEB-3 is so 
well designed and so versatile that it will not need 
to be replaced — ever. Simple changes in software and/or 
hardware will allow the SEB-3 to: generate displays up to 256 



columns; handle 50 Hz European formats; accomodate custom 
characters or character cell sizes larger or smaller than 8x8 
and transparently access the screen to eliminate screen 
"glitches". In short, the SEB-3 will meet any demands your 
system may place on it now and in the future. The SEB-3 also 
supports an OSI-style floppy disk interface which can handle 
two 5" or 8" drives. Like all of the boards in the SEB series, 
the SEB-3 simply "plugs in" to your machine — there are 
absolutely NO hardware changes. The SEB-3 is designed to 
replace your outmoded 540 board so you don't even lose a 
backplane slot. Your keyboard input now also plugs into 
the SEB-3 — load one of the software drivers and you're 
ready to go! 
SEB-3 Assembled $259.00 Bare Board $59.00 

Kit $220.00 Manual only $5.00 




If your Challenger can't generate displays like those shown 
above WHAT ARE YOU WAITING FOR? The SEB-1 High 
Resolution Graphics and Memory Board (for C1P and 
Superboard II) and the SEB-2 High Resolution Graphics and 
Disk Controller Board (for C2/4/8) simply 'plug-in' to your 
computer and give you instant access to over 49000 
individually addressable pixels in up to 8 colors! Your Hi-Res 
screen can go from 32 x 16 alphanumerics to 256 x 192 point 
graphics in 1 1 software selectable modes. The standard video 
of your computer is left intact, so that none of your current 
software library is outmoded. Use the graphics for Business, 
Scientific, Education, or Gaming displays that were impossible 
— until now! SEB-1 SEB-2 



Installation of either board requires absolutely NO modification of 
your computer — they just 'plug-in'. Nor do they preclude your 
using any other OSI-compatible hardware or software. In addition 
to the Hi-Res Graphics the SEB-1 gives C1 & Superboard II users 
16K of additional user memory (over and above that memory 
devoted to the graphics), two 16 bit timers/counters, an on-board 
RF modulator, and a parallel port with handshaking. The SEB-2 
gives OSI 48-pin BUS users an OSI hardware/software 
compatible Disk controller, and an RF modulator that can be 
user-populated. 

FOR OSI 1P, 2-4P, 2-8P, C4P, C8P 



SEB-1 



SEB-2 



Assembled and Tested 
Kit 



$249.00 (5K RAM) 
$165.00 (No HAM) 



$239.00 (1K RAM) 
$199.00 (No RAM) 



COMING: SEB-3 80x24 Video/Disk Controller IC2I4IS), SEB-4 4SK Memory 
RAM/ROM (C2/4I8), SEB-S 8K RAMIDisklSoundlClocklVolce (C1 t Superboard). 
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Bare Board & Manual $ 59.00 $ 59.00 

Manual only $ 5.00 $ 5.00 
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About the Cover 




Our brave knight, Godfrey de Good- 
heart, boldly chases dragons through 
Baron Von Evil's castle in search of the 
fair Princess Fatima. MICRO features 
"Castle Adventure'* by David Malmberg 
(page 41). It is written for PET, Apple, 
and other Microsoft BASIC computers. 

The photo, by Kenneth Witham, is of 
Schloss Anif in Salzburg, Austria. The 
knight and dragon graphics were drawn 
on the Apple Graphics Tablet. 
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Editorial 



Responsible Gamesmanship 

MICRO does not publish games. We've 
run editorials explaining why — out- 
lining the weaknesses, drawbacks, and 
worthlessness of many computer 
games. The computer was not devel- 
oped to fill arcades or to force squeals of 
delight or anguish from mesmerized 
users who've spent hours killing the 
same aliens over and over again. 

So why have we not only added 
games in this issue, but FEATURED 
them? We aren't giving in ; we still 
believe many games are a waste of 
time. But we also believe that games — 
when written and presented properly — 
can educate. In fact, they can act as an 
effective tool at all educational levels. 

For example, there are games that 
simulate business environments, 
games that demand logical thought, 
games that teach us how to program, 
how to spell, or to calculate math- 
ematical equations. The variations of 
these games that are most successful 
actively involve the student/partici- 
pant in problem solving and decision 
making. They are not just drills to 
enable us to push the right button at 
the right time or to give the right 
answer; they are lessons in learning — 
they can expand our understanding of 
both artificial and human intelligence. 

You see, it's the games that just pit 
one person against the computer in a 
mindless battle of eye-hand coordina- 
tion that irritate us the most. (Does an 
image of your neighborhood's favorite 
arcade leap to mind?) Maybe these 
florescent, noisy battlegrounds provide 
entertainment for those who need to let 
off a little steam; but to have energetic, 
lively, questioning children and adoles- 
cents glued to machines in meaningless 
combat for hours on end is scary. 

Whose responsibility is it (yours, 
ours, the schools, the manufacturers) 
to offer at least enough of the really 
worthwhile stuff to balance off what's 
already so, unfortunately, popular? 



Judah Schwartz, Professor of Engi- 
neering Science and Education at MIT, 
summed up the software situation in a 
recent issue of Classroom Computer 
News. Although his comments were 
directed specifically toward educa- 
tional material, they can be as easily 
applied to games in general: "My hope 
is that the publishers of this country — 
who control the curriculum far more 
than they even begin to realize — will 
stop doing what they are now doing and 
start to provide materials for computers 
which are more open-ended, which are 
more tool-like in nature, which will 
help children to assume a more active 
role, which will not trivialize the 
nature of education, and which will 
work to make schools more nearly the 
collaborative community of learners 
that they should be." 

Computers are efficient, friendly, 
and generally expensive. As with every- 
thing else, we want them to be used to 
their full potential. One way is through 
well-written, mind-boggling, educa- 
tional games. So, MICRO would like to 
promote the use of these types of 
games. We encourage manufacturers to 
continue to produce quality products 
that get the most out of the computer 
and the participant. We encourage pub- 
lishers of books and magazines to sup- 
port the use of stimulating games that 
require both the use of skill and the 
growth of skills. 

We hope you enjoy the games we 
present in this issue, but also hope you 
will learn some new techniques and 
some good methods for writing your 
own games. We hope you will give 
some thought to the social impact of 
computer games, as well. 
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MACHINE LANGUAGE SPEED 
WHERE IT COUNTS... 

IN YOUR PROGRAM! 



■\ 



For the first time, AmperMagic makes it easy for people who don't know 
machine language to use its power! Now you can attach slick, finished machine 
language routines to your Applesoft programs in seconds! And interface them 
by name, not by address! 

You simply give each routine a name of your choice, perform the append pro- 
cedure once at about 15 seconds per routine, and the machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 

Up to 255 relocatable machine language routines can be attached to a BASIC 
program and then called by name. We supply some 20 routines on this disk. More 
can be entered from magazines. And more library disks are in the works. 

These routines and more can be attached and accessed easily. For example, 
to allow the typing of commas and colons in a response (not normally allowed in 
Applesoft), you just attach the Input Anything routine and put this line in your program: 

xxx PRINT "PLEASE ENTER THE DATE."; : & INPUT,DATE$ 



&-MAGIC makes it Easy to be Fast & Flexible! 

PRICE: $75 



&-Magic and Amper-Magic are trademarks of Amhro-Digiial, Inc. 
Applesoft is a trademark of Apple Computer, Inc. 



Some routines on this disk are: 

Binary file info 

Delete array 

Disassemble memory 

Dump variables 

Find substring 

Get 2-byte values 

Gosub to variable 

Goto to variable 

Hex memory dump 

Input anything 

Move memory 

Multiple poke decimal 

Multiple poke hex 

Print w/o word break 

Restore special data 

Speed up Applesoft 

Speed restore 

Store 2-byte values 

Swap variables 



Anthro - Digital Software 

P.O. Box 1385 

Pittsfield, MA 01202 

The People - Computers Connection 



J 



«aes9SS#* 



ACE 100 
a 199500 

ACE 1 00 64K 2 RANA DRIVES 
12" NEC GREEN SCREEN MONITOR 



VOICE SYNTHESIZER FOR AIM/SYM/KIM WITH SPEAKER 
AIM 65, 4K, COMPLETE WITH MANUALS 



[ 6502P. 1 MHZ $ 5.95 

6512P, 1 MHZ S.95 

6520P. PIA 4.45 

6522P. VIA 6.45 

6532P, RIOT 795 

6545-1 P, CRT 1995 

6551 P, UART 8.95 

6592P, PRINT CTRL 26.80 

6847P, VDG 15.60 



NEW FULLY GUARANTEED PARTS 

21 14, 1Kx4, 450NS S 2 25 

61 16, 2Kx8. CMOS 7 50 

41 16. 16Kx1. DYNAMIC 195 

4164, 64Kx1, DYNAMIC 10.95 

2716,2Kx8 3.95 

2532, 4Kx8 8.50 

4N33. OPTO-COUPLER 2.95 

VOLTRAXSC-01A 69.00 











...$139.00 




... 






. . . $469.00 


555 TIMER 








$ 39 1 


XR2206 ... 








495 


XR221 1 








4 95 1 


DM8131. 








3 45 1 


REDL.E.D.. 


Tl J/. 


HI 


EFF 


15 1 


N4004 








09 1 


N914 ... 








04 1 


N4148.. 








04 1 


8 POSITION DIP SWITCH. .. 


4.95 1 



PHONE ORDERS WELCOME - FREE CATALOG - HOURS 9 A.M. TO 5 P.M. CST. 



CASHIERS CHECK or MONEY ORDER 

PERSONNEL CHECKS, 2 WEEKS WITH D.L# 

MC or VISA, MUST HAVE CARD NO. 

SHIPPED VIA U.P.S. or 1st CLASS MAIL 

COD. ACCEPTED, ADD $5.00 

MAIL ORDER ONLY 





ADD $1.75 FOR U.P.S. 

ADD $2.75 for 1 st CLASS MAIL 

ADD ADDITIONAL $5.00 FOR C.O.D. 

ADD ADDITIONAL $3.75 FOR OUT OF U.S. 

TEXAS RESIDENTS ADD 5% SALES TAX 

PRICES GOOD THROUGH DECEMBER 31, 1982 
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BEDFORD MICRO SYSTEMS 81 7 - 283-001 3 

P.O. BOX 1182 BEDFORD, TEXAS 76021 
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Installing Atari Joysticks 
on the OSI 



by Joseph Ennis 



A simple, non-destructive 


Molex connector according to the fol 


modification to the OSI C1 P or 


lowing table: 




Superboard is described. This 


Molex 




allows the use of inexpensive 


Pin Joystick 1 


Joystick 2 


Atari joysticks. Demonstration 


1 — 


Black 


software and programming 


2 Black 


— 


information are also included. 


3 — 
4 


- 




5 Green 

6 Blue 


Green 




Blue 


Joystick 


7 Brown 


Brown 


requires: 


8 White 


White 


C1P 


9 Orange 


Orange 


Hardware components 


10 — 


— 


One or two Atari joysticks 


11 — 

12 — 






Installing Atari joysticks on the OSI 
600 board-based computers (Super- 
board or C1P) is easy. It takes $9.95 per 
joystick and five minutes. 

Sears is a good source for Atari 
joysticks; they stock them under two 
catalog numbers — 6K99835 for a 
single joystick or T3K7687 for a pair. 
You'll pay $19.95 for two. In addition 
you will need one 12-pin male Molex 
connector. You may purchase one from 
your OSI dealer for $1.00, or from 
Technical Products Co., Box 12983, 
University Station, Gainsville, FL 
32604 (Molex connectors are $4.95 for 
four pair of male and female) . 

My 600 board came without J4 
mounted, but it took me about one 
minute to push a connector into the 
holes in the printed wiring board and 
solder the twelve pins to the board. 

When you get the joysticks, cut the 
Atari cables as close to the connector as 
possible, and strip enough of each wire 
to connect to a male Molex connector 
(about 1/8 inch). I used a drill press 
vise to hold the Molex connector and 
an X2 magnifying glass to aid in solder- 
ing. I also used the trick of wrapping 
several turns of number 18 buss wire 
around the tip of my 15-watt pencil 
iron to give me a fine soldering point. 

Solder the wires of both joysticks (if 
you plan to use two) to the single male 



For those interested in how this 
modification works, figure 1 shows the 
schematic of the 600 board keyboard 
area with the joysticks connected to 
connector J4. 

Testing is also easy. First do the 
usual inspection for poor workman- 
ship, solder bridges, etc. Then plug the 



joystick connector into [4, the connec- 
tor in the lower left corner or closest to 
the keyboard (see photograph). Plug in 
the joystick connector so that pin 1, the 
one with a black wire on it, is toward 
the back of the 600 board (away from 
the keyboard). Bring up power and, 
without touching the joystick, check to 
see that the keyboard works as before. 
Now pick up joystick 1, the one with 
its black wire connected to pin 2. Move 
the controls on the joystick and note 
that characters are printed to the 
monitor screen according to the follow- 
ing table. Pick up joystick 2 and per- 
form the same test. Any problem is 
most likely a soldering problem. 



Fire 

Up 

Right 


Joystick 1 

Q 
A 
Z 


Joystick 2 

1 
2 
3 


Down 
Left 


Space 

/ 


4 

5 



Don't worry about Up-Right or Up- 



Figure 1: Keyboard/Joystick Schematic 
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Right-While-Filing. These combina- 
tions are there, but right now they 
decode to non-printable symbols and 
don't show on the monitor screen. 

This completes installation and 
testing. The rest of the joystick opera- 
tion is software. At the time of this 
writing OSI had not yet come out with 
any joystick programs for the 600 board 
computers, so there had not been any 
standardization of the joystick move/ 
decode tables. Much joystick software 
for the OSI is sold by Aardvark Techni- 
cal Services, 2352 South Commerce, 
Walled Lake, MI 48088. Aardvark uses 
a slightly different method of connec- 
ting joysticks and a different decode. 
There are advantages and disadvan- 
tages. Aardvark' s Mod is longer and re- 
quires cutting some traces on the 600 
board. However, they have a lot of good 
software already developed according 
to their convention. Fortunately, the 
difference is not great. Joystick 2 in this 
mod has the same decode as joystick 1 
in the Aardvark mod. Therefore, all 
one-player games need no changes. 
Aardvark's joystick 2 is connected so 
that it decodes to: Fire = 8 Up = 9 
Right = Down=: and Left = -. For 
two-player Aardvark games the code 
must be changed. 

When writing software for joy- 
sticks, the following line must appear 
early in the program: 

POKE 530,1 :REM TURNS OFF KEY- 
BOARD SCAN, POKE 530,0 WILL TURN 
KEYBOARD SCAN ON AGAIN 

Later in the program, when joystick 
1 is to be polled, program: 

POKE 57088,128: P = PEEK(57088) 

and when joystick 2 is to be polled, 
program: 

POKE 57088,2: P = PEEK(57088) 

Table 1 gives all the possible values for 
variable P. 

A joystick demo program has been 
included at the end of this article. This 
demo illustrates most of the techniques 
for animated graphics and their use 
with joysticks. 

This program, when running, will 
display two tank symbols. Each tank 
symbol will be controlled by one 
joystick. A study of listing 1 will illus- 
trate the programming techniques re- 
quired by programs using joystick in- 
puts. It is not necessary to have a joy- 
stick decode table with all seventeen of 
the entries given in table 1, since 
FIRING is merely the position values, 
less 127. Therefore, note that in line 70 
FIRE is set equal to 128 and in line 1000 
P is checked to see that it is less than 
FIRE. If it is, then the program jumps to 
the FIRE subroutine at 2000. The last 



Listing 1 



REM***************** 










1 REM JOYSTICK 


** 










2 REM DO0DLER 


** 










3 REM 


** 










4 REM bv 


** 










5 REM Joseph Ennis 


** 










4 REM 


** 










7 REM A- DEMO of JOY 


-** 










8 REMSTICK TECHNIQUES* 










9 REM***************** 










10 REM JOYSTICK ONE 


IS 


SET AT 1=FIRE, 


2 = UP. 


3=BOWN, 


4=LEFT 


11 REM JOYSTICK TWO 


IS 


SET AT Q=FIRE. 


A = UP, 


Z=RIGHT 


SPACE=DOWN 



/=LEF 

12 REM YOU HILL NOTE SOME INTERACTION PROBLEMS WITH BOTH FIRE BOTTONS 

13 REM SET TO COLUMN 7 THIS CAN BE FIXED BY SETTING FIRE ON 

14 REM JOYSTICK TWO TO FIRE=f AND MAKING A FEW CHANGES IN FIRE SUBROUT 

15 DIM K(8) . M<3> , S(S) 
20 X = 0: 



U = 
30 FOR X=l TO 8: 
40 FOR X=l TO 8: 
50 FOR X = l TO 8s 



BLANK=32 

S, 2110 



READ KIX): NEXT: REM LOADS KEY DECODE TABLE 
READ MIX): NEXT: REM LOADS MOVE TABLE 
READ SIX): NEXT: REM LOADS SYMBOL TABLE 
40 A=53480: B=54041: REM TANK ASB START LOCATIONS 

70 AA = 2: BB=128: N00P=254: FIRE=128: C=57088: SHELL=44 

71 REM FIRE REALLY EQUALS 127 BUT SETTING TO 128 SAVES AT 10 

74 FOR X = l TO 32: PRINT: NEXT 

75 INPUT"SELECT SPEED (1=FAST 200=SLOW) "! DELAY 
90 FOR X=l TO 32: PRINT: NEXT: REM SLOW SCREEN CLEAR 
100 POKE 530i l: REM TURN OFF AUTOMATIC KEYBOARD SCAN 
110 POKE A.SI4): POKE B.SI8) : REM INITIALIZE TANK LOCATIONS 
120 POKE C.AA: P=PEEK(C): IF P<N00P THEN F=2: GOTO 1000 
130 POKE CfBB: P=PEEK(C): IF P<NO0P THEN F = 3: GOTO 1000 
140 GOTO 120: REM LOOP WAITS FOR JOYSTICK MOVEMENT 
200 DATA 190. 158. 222. 204. 233. 230. 244. 182 
210 DATA -32. -31. +01. +33, +32. +31. -01 
220 DATA 248, 249. 250. 251, 252. 253. 254 
990 REM MOVEMENT SUBROUTINE STARTS ON 1000 
1000 IF P<FIRE THEN G0SUB 2000 
1005 IF P=N00P THEN GOTO1050 
1010 FOR X = l TO 8 
1020 IF K(X)=P THEN M0VE=M(X> 
1025 NEXT X 

1030 IF F=2 THEN POKE A, BLANK: A=A+M0VE: P0KEA . SYMBOL : REM CLASSIC MOV 

1040 IF F=3 THEN POKE B, BLANK: B=B+M0VE: POKE B, SYMBOL: REM MOVE B 

1045 FOR X = l TO DELAY: Z = 2: NEXT X 

1050 ON F GOTO 1000.130.120: REM LOOPS BACK TO JOYSTICK DET LINES 

1990 REM FIRE DECODE SUBROUTINE STARTS ON 2000 

2000 REM FIRE DECODE SUBROUTINE 

2005 IF F = 2 THEN SYMBOL=PEEK I A > : 

2010 IF F=3 THEN SYMBOL=PEEK IB) 

2020 FOR X = l TO 8 

2030 IF S(X)=SYMB0L THEN W = X: L=L+M(W): 

2035 NEXT X 

2040 FOR U=l TO 10*RND(X): REM MOVE SHELL. JUST EFFECTS NO ATTEMPT TO 

2050 POKE L. SHELL: V=l: POKE L. BLANK: L=L+M(W) 

2040 NEXT U 

2070 FOR U=l TO 10 

2080 POKE L.INT(100*RND(X) ) : REM A LITTLE EXPLOSION AT END OF SHELL FL 

2090 NEXT U 

2100 POKE L. BLANK: REM CLEANS UP LAST OF EXPLOSION 

2110 P=P+FIRE 

2120 RETURN 



-33 
255 



SYMB0L=S(X): X = 8: REM SETS UP FOR MOVE 



L = A: REM GUN NEEDS TO KNOW WAY TANK F 
L=B: REM WAY TANK B FACES 



X=8 



line in the FIRE subroutine adds 127 
back to P, taking out the effect of FIRE 
before turning control over to the 
MOVE loop. This halves the time of 
the loop and the size of the joystick 
decode table, as only eight values are 
needed for two joysticks. This still 
allows the players to move while firing. 
There is one disadvantage with the 
technique used in this joystick mod. 
When two players are playing and both 
players are moving their joysticks at 
the same time, there are combinations 
where there can be feedback through 
the joystick switches. With the key- 
board polling routine that OSI uses, one 
data line at a time is set on the LS75 
latches, U2 andU3 |see figure 1). When 



one latch (these are inverting latches) is 
set it pulls down the line to one of the 
rows of keys on the keyboard. If any 
key in that row is pushed, its position 
will be read by the LSI 25 bus drivers. 
This is why a PEEK to the keyboard ad- 
dress will return the value of 255 (all 
ones) when no keys are pushed. When 
only one of the LS75 latch stages is 
energized, then only one row is set for 
decode. 

Pushing a key in any other row will 
not produce any output on the data bus . 
This is why selecting one joystick to 
row 1 and the other to row 7 will allow 
one joystick to be decoded indepen- 
dently of the other, even though they 
are connected to the same columns. 
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Table 1 






Joystick 


Value 


Movement 


Position 


of P 


Value 


Not FIRING 




Current 


and: 




Position plus 


Up 


190 


-32 


Up/Right 


158 


-31 


Right 


222 


+ 01 


Down/ Right 


206 


+ 33 


Down 


238 


+ 32 


Down/ Left 


230 


+ 31 


Left 


246 


-01 


Left/ Up 


182 


-33 


FIRING and: 






No movement 


127 


+ 00 


Up 


063 


-32 


Up/Right 


031 


-31 


Right 


095 


+ 01 


Down/Right 


,079 


+ 33 


Down 


111 


+ 32 


Down/ Left 


103 


+ 31 


Left 


119 


-01 


Left/Up 


055 


-33 



When the computer wants to check joy- 
stick 1 for movement, a 128 is POKEd 
into the keyboard address (polling must 
be suppressed at this time by the POKE 
530,1 having already been executed) 
and only a key closure in row 1 will 



produce an output on the data bus. It is 
connected to the only low latch; all the 
rest are high. As long as 128 has been 
POKEd to the keyboard address, only a 
movement of joystick 1 can be read. If 
joystick 1 is not being moved, then no 
movement of joystick 2 will produce 
any output on the data bus. The same 
thing happens when the computer 
wants to read joystick 2; a 2 is POKEd 
to the keyboard address, which allows 
only the keys in row 7 to be active. No 
other keys will produce any output on 
the data bus. The only problem occurs 
when both joysticks are being moved at 
the same time. The worse case is when 
one is moving and firing and the other 
is only firing. The low set by the latch 
will feed through the two fire switches 
and be read as a movement by the bus 
driver when only a fire was intended. 
This can really destroy a game. Putting 
another isolating diode in any of the 
joystick lines doesn't help, as the 
LS125's are too sensitive. They see the 
forward voltage drop of the two diodes 
in series (one of the diodes Dl through 
D8 with any additional isolating 
diode), which causes the LSI 25 to 
always stay high. No key closures are 
detected. A pull-down resistor to a 
negative supply in conjunction with 



the isolating diode would be a solution. 
Another solution is a hearing aid 
battery in series with the joystick's 
isolating diode. Or you could just give 
up the option of moving while firing. I 
use a software solution which, while 
not perfect, has yet to produce any ob- 
jectional performance in any of the 
games I am running. Move the orange 
wire on joystick 1 from pin 9 to pin 4 
and make the following software 
changes: define a new variable in demo 
program line 70 like FO = 251, and 
rewrite line 1000 as 1000 IF FIRE < P 
OR (P AND FO) THEN GOSUB 2000. 
This way the FIRE push buttons are 
connected to separate columns and 
can't feed back through each other's 
switches. Movements are now only 
slightly affected. If one joystick is do- 
ing Up/Right and the other is doing Up, 
then both will do Up/Right. But if one 
is doing Up/Right and the other is 
doing Up/Left or anything besides pure 
Up, then both will move their separate 
ways. In an actual game, this fix is 
sufficient. 

You may contact Mr. Ennis at 212 20 St., 
Niceville, FL 32578. 

JMCRO 



OSI 



C1P 



Stankiewicz & Robinson, 

authors of MINOS, NIGHT RIDER, etc., 

proudly present to you: 

34 original PROGRAMS on tape all for the unbelievably low price of $29.95!! 

That's less than $1 each! 





PINBALL 

ARCADE TYPE 

NIGHT RIDER* 

COSMIC DEBRIS* 

MINOS* 

STREET SWEEPERS 

RIDGE CRUISER 

CAGE* 

PINBALL 

OSI GRAND* 

MINE FIELD 

WORM 

DEPTH CHARGE 

GOTCHA! 



MINOS (MAZE) 

STRATEGY 

TAKE FOUR 

MIMIC 

MANCALA 

NEIGHBORS 

BAR 

LIFE FOR TWO* 

KALEIDOSCOPIC 

LIVING PATTERNS 
KALEIDOSCOPE 
DRAW ME 



All programs will run on 8k ClP. 
Many are compatible for C2/4 
and run in 4k. 





NIGHT RIDER 
UTILITIES 

TAPE VERIFIER 
LISTING LINE RE. » 
VERSATILE LINE RE. » 
LINE LOCATOR 

STATISTICS 

CHI SQUARE 
FUNCTION PLOTTER 
BETTER RND. # GEN. 
PROBABILITY #1 



RIDGE CRUISER 
MISCELLANEOUS 

MESSAGE ENCODER 
TYPING TUTOR 
PHONE NUMBER 
DEHYDRATION 
BLACK JACK DRILL 

(* Previously sold 
by AARDVARK™ ) 




Please add $1.50 postage & handling 

PA resident please add 6% sales tax 

Charge customers include tt and 

expiration date 

VICTORY SOFTWARE CORP. 

2027-A S.J. RUSSEL CIRCLE 

ELKINS PARK, PA 19117 

Sorry, no phone orders on this special deal 
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The 68000 

DREAM MACHINE 



WE (SORT OF) LIED: 

Motorola has been promoting its advanced microprocessor 
chip as a vehicle for large, complex systems exclusively. 
Now, the 68000 does work well as the heart of big, complex 
systems. But their promotional literature implies that one 
can only build big, complex systems with the 68000, and that 
is dead wrong (in our opinion). Nevertheless, the public 
(that's you!) perception of the 68000 follows Motorola's line: 
Big systems. Complex systems. 

Our boards are not complex and not necessarily big (starting 
at 4K). Our newsletter is subtitled "The Journal of Simple 
68000 Systems." But since the public has become condi- 
tioned to the 68000 as a vehicle for FORTRAN, UNIX, LISP, 
PASCAL and SMALLTALK people naturally expect all these 
with our $595 (starting price) simple attached processor. 
Wrong! 

We wrote our last ad to understate the software we have 
available because we wanted to get rid of all those guys who 
want to run (multi-user, multi-tasking) UNIX on their Apple II 
and two floppy disks. Running UNIX using two 143K floppies 
is, well, absurd. The utilities alone require more than 5 
megabytes of hard disk. 

HERE'S THE TRUTH: 

We do have some very useful 68000 utility programs. One of 
these will provide, in conjunction with a suitable BASIC com- 
piler such as PETSPEED (Pet/CBM) or TASC (Apple II), a five 
to twelve times speedup of your BASIC program. If you have 
read a serious compiler review, you will have learned that 
compilers cannot speed up floating point operations 
(especially transcendentals). Our board, and the utility soft- 
ware we provide, does speed up these operations. 

Add this line in front of an Applesoft program: 

5 PRINT CHR$(4);"BLOADUTIL4,A$8600":SYS38383 

That's all it takes to link our board into Applesoft (assuming 
you have Applesoft loaded into a 16K RAM card). Now run 
your program as is for faster number-crunching or compile it 
to add the benefit of faster "interpretation". Operation with 
the Pet/CBM is similar. 

68000 SOURCE CODE: 

For Apple II users only, we provide a nearly full disk of un- 
protected 68000 source code. To use it you will have to have 
DOS toolkit ($75) and ASSEM68K ($95), both available from 
third parties. Here's what you get: 

1) 68000 source code for our Microsoft compatible floating 
point package, including LOG, EXP, SQR, SIN, COS, TAN, 
ATN along with the basic four functions. The code is set up to 
work either linked into BASIC or with our developmental 
HALGOL language. 85 sectors. 



2) 68000 source code for the PROM monitor. 35 sectors. 

3) 68000 source code for a very high speed interactive 3-D 
graphics demo. 115 sectors. 

4) 68000 source code for the HALGOL threaded interpreter. 
Works with the 68000 floating point package. 56 sectors. 

5) 6502 source code for the utilities to link into the BASIC 
floating point routines and utility and debug code to link into 
the 68000 PROM monitor. 113 sectors. 

The above routines almost fill a standard Apple DOS 3.3 flop- 
py. We provide a second disk (very nearly filled) with various 
utility and demonstration programs. 

SWIFTUS MAXIMUS: 

Our last advertisement implied that we sold 8MHz boards to 
hackers and 12.5MHz boards to businesses. That was sort of 
true because when that ad was written the 12.5MHz 68000 
was a very expensive part (list $332 ea). Motorola has now 
dropped the price to $1 1 1 and we have adjusted our prices ac- 
cordingly. So now even hackers can afford a 12.5MHz 68000 
board. With, we remind you, absolutely zero wait states. 

'Swiftus maximus'? Do you know of any other 
microprocessor based product that can do a 32 bit add in 0.48 
microseconds? 

AN EDUCATIONAL BOARD? 

If you want to learn how to program the 68000 at the 
assembly language level there is no better way than to have 
one disk full of demonstration programs and another disk full 
of machine readable (and user-modifiable) 68000 source 
code. 

Those other 'educational boards' have 4MHz clock signals 
(even the one promoted as having a 6MHz CPU, honest!) so 
we'll call them slow learners. They do not come with any 
significant amount of demo or utility software. And they com- 
municate with the host computer via RS 232, 9600 baud max. 
That's 1K byte/sec. Our board communicates over a parallel 
port with hardware AND software handshake, at 71 K 
bytes/sec! We'll call those other boards handicapped 
learners. 

Our board is definitely not for everyone. But some people find 
it very, very useful. Which group do you fit into? 

DIGITAL ACOUSTICS 

1415 E. McFadden, Ste. F 

Santa Ana, CA 92705 

(714) 835-4884 



Apple, Applesoft and Apple II are trademarks of Apple Computer Company. Pel is a trademark of Commodore Business Machines. - 
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An MC68000 Overview, Part 2 



by Joe Jelemensky and Tom Whiteside 



This second part of the 68000 
overview provides simple 
programming examples to 
illustrate programming 
techniques and special features 
of the MC68000. Part 1 appeared 
in MICRO (52:32). 



A Simple MC68000 Subroutine to 
Compare Two Strings 

As a first example of programming the 
MC68000, consider the string compari- 
son subroutine in figure 1 . This simple 
subroutine will return with the Zero 
flag set if the first string matches the 
second. We will use the convention that 
all strings must be terminated with a 
zero. Address registers "A0" and "Al" 
will be used as pointers to the begin- 
ning of the two strings to be compared. 

The subroutine documentation 
shows the calling sequence for 
STRCMP. In the subroutine usage doc- 
umentation, the string pointers are in- 
itialized using the "MOVEA" (MOVE 
Address) instructions. The ".L" suffix 
on the MOVEA instructions tells the 
assembler that a long address is to be 
moved. A ".W" suffix specifies a sign 
extended 16-bit word address. In the 
MC68000, whenever an instruction has 
two operands, the first operand is the 
source and the second is the destina- 
tion. For the first "MOVEA" instruc- 
tion, "FIRST" is the absolute memory 
address to be used as a source for the 
long word to be moved to the destina- 
tion "A0". Naturally, we can use any 
of the other addressing modes to 
specify the string location instead of ab- 
solute if we choose to. 

After the string pointers are in- 
itialized, the user does a "JSR" (Jump 
to SubRoutine) to the string compare 
subroutine followed by a branch based 
on the Z flag. The "BEQ.S" is a branch 
if equal to zero (string match). The 
".S" suffix tells the assembler that the 
destination is within the range of an 
8-bit signed displacement. An ".L" suf- 
fix is used for 16-bit displacements. 



The STRCMP subroutine begins 
and ends with "MOVEM. L" instruc- 
tions to preserve all the registers that 
are used. The first "MOVEM" (MOVE 
Multiple) instruction moves the 32-bit 
contents of "A0" through "Al" and 
"DO" to the stack, which is pointed at 
by "A7". The assembler syntax for the 
register list on a "MOVEM" instruc- 
tion can be in the form "A0/A1/A2/ 
A3/A4/A5/A6/A7/D0/D1/D2/D3/ 
D4/D5/D6/D7" or the shortened form 
"A0-A7/D0-D7". The "-(A7)" des- 



tination means to use the pre- 
decrement indirect addressing mode 
with the stack pointer "A7". This is 
equivalent to pushing the registers onto 
the system stack. The MC68000 
assembler automatically adjusts the 
number to decrement or increment 
based on the total size of the operation. 
The final "MOVEM" instruction does 
just the opposite and loads "A0" 
through "Al" and "DO" from the 
stack using the post-increment indirect 
addressing mode from "A7". This is 



Figure 1: 


MC68000 String Compare 




ROUTINE: 


STRCMP — STRing CoMPare 


PURPOSE: 


Compare two strings. If the first string matches the second 
string then return with the "Z" bit set. The user points A0 at 
the start of the first string, and Al at the start of the second. 


ASSUMPTIONS: 


Strings terminate 


n a zero. 






sample string: 


FCC 'this is a string' 
FCB 00 


EXAMPLES: 


First string 


Second string Z bit 






'cattle' 
'cat' 

'cattle' 
'cat' 


'cattle' 1 match 
'cattle' 1 match 
'any string' 1 match 
'cat' no match 
'fatcat' no match 


USAGE: 




MOVEA. L FIRST.AO POINT AT FIRST STRING 
MOVEA. L SECOND,Al POINT AT SECOND STRING 
JSR STRCMP COMPARE THE STRINGS 
BEQ.S xxxx BRANCH IF MATCH IS FOUND 


STRCMP EQU * 

* 






* 


MOVEM. L A0-A1/D0, -|A7) 


PRESERVE ALL REGISTERS ON THE STACK 


LOOP 


EQU * 

MOVE.B 

BEQ.S 


(A0)+,D0 
QUIT 


GET THE NEXT CHARACTER IN THE 
FIRST STRING. IF AT THE END OF THE 
FIRST THEN IT MATCHES! 


* 


CMP.B 
BEQ.S 


D0,(A1) + 
LOOP 


DOES NEXT CHARACTER IN THE 
SECOND MATCH? IF IT MATCHES KEEP 
TRYING. OTHERWISE, FALL THROUGH 
WITH Z BIT = 0. 


QUIT 


EQU * 

MOVEM.l 

RTS 


(A7)+,A0-A1/D0 


RESTORE THE REGISTERS 
AND LEAVE. 
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equivalent to pulling the registers off 
the system stack. 

The actual string compare code is 
only four instructions long. The 
"MOVE.B" instruction moves the next 
character from the first string to "DO" 
and bumps the first string pointer to 
the next character. If we have reached 
the end of the first string then, by our 
convention that all strings end in zero, 
the Zero flag will be set and the short 
branch will be taken. (We found a 
match!) Otherwise, the "CMP.B" in- 
struction checks to see if the lower byte 
in the data register matches the next 
character in the second string and 
bumps the pointer to the next charac- 
ter. If the characters match, the routine 
loops back to "LOOP" and tries the 
next character. If they do not match 
(including the case where we reach the 
end of the second string) the code falls 
through with the Zero flag cleared. 

MC68000 Code for a Pascal Loop 

The next example illustrates use of 
the MC68000' s powerful DBcc looping 
instruction. DBcc is designed to speed 
up the "FOR", "WHILE", and "RE- 
PEAT UNTIL" loops used so frequently 
in high-level languages (HLL). The 
DBcc instruction has three parameters: 
a terminating condition, a data register, 
and a branch displacement. The in- 
struction first sees if the terminating 
condition has been met, and if so, the 
branch specified by the branch offset is 
not taken. If the terminating condition 
is not met, the specified data register is 
decremented. If the result of this decre- 
ment is not - 1 then the branch is 
taken. Otherwise, the branch falls 
through. The "cc" part of the instruc- 
tion can be any of the conditions shown 
in table 6 (see Part 1, MICRO 52:38]. 

The following Pascal procedure and 
accompanying MC68000 code frag- 
ment illustrate how the DBcc instruc- 
tion works (figure 2). The "REPEAT 
UNTIL" loop will continue until "i" 
has counted down to - 1 or "CAT" 
equals "RAT". The MC68000 code 
uses "DO" for "i" and uses "DBEQ" 
to loop until "DO" = - 1 or the 
previous comparison sets the Z flag. 
The DBcc instruction takes no more 
time than a simple branch instruction 
when the branch is taken. The equi- 
valent code without the DBcc instruc- 
tion is obviously much longer. 

High-Level Language 
Procedure Calls 

It is becoming increasingly impor- 
tant for processors to be able to handle 
subroutines efficiently as programs be- 
come more modular. This is true both 



Figure 2: Example use of the DBcc (test condition Decrement and Branch) instruction. 


PROCEDURE typical; 
CONST maxcnt = 10000; 




VAR i,cat,rat:integer ; 
BEGIN 




i: = maxcnt; 
REPEAT 




i: = i- 1; 




UNTIL (i < 0) OR (cat = rat); 
END; { typical } 




MOVE #MAXCNT- 1,D0 
LOOP EQU * 


INITIALIZE LOOP COUNTER 


MOVE.W CAT,D1 
CMP.W RAT,D1 
DBEQ.S D0,LOOP 

+ 


GET CURRENT VALUE OF "CAT" 
SEE IF "CAT" IS EQUAL TO "RAT" 
DECREMENT "1" AND LOOP UNTIL "I" = 
- 1 OR "CAT" EQUALS "RAT" 


Figure 3: Example Pascal Procedure Call 


PROCEDURE dojunk(VAR a,b:INTEGER; c,d:INTEGER); 

VAR i,j,k:INTEGER ; 

BEGIN 


END; 




+ 

* SET UP FOR PROCEDURE CALL 

* 




INIT POINTERS TO VARIABLE PARAMETERS 

* 


PEA A 
PEA B 


PUSH POINTER TO VARIABLE "A" 
PUSH POINTER TO VAiUABLE "B" 


MAKE COPY OF VALUE PARAMETERS ON THE STACK 

* 


MOVE.W C,-(A7] 
MOVE.W D, - (A7) 

* 


PUSH COPY OF "C" 
PUSH COPY OF "D" 


* CALL PROCEDURE 

* 




JSR DOJUNK 

* 


CALL THE PROCEDURE 


* CLEAN UP STACK AFTER PROCEDURE AND RESTORE REGISTERS 

* 


ADDQ #6,A7 


REMOVE PARAMETER LIST FROM STACK 


DOJUNK EQU * 

LINK A0,#-3 


MAKE ROOM ON STACK FOR LOCAL 
VARIABLES 


UNLK A0 
RTS 


CLEAR OFF STACK AND RESTORE A0 
BEFORE LEAVING 
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at the assembly-language level and for 
implementing modern HLLs. Figure 3 
shows a typical Pascal procedure and 
how the procedure call might be im- 
plemented in MC68000 code. 

Procedure "dojunk" is a typical 
Pascal procedure with variable para- 
meters "a" and "b" and value para- 
meters "c" and "d". For those un- 
familiar with Pascal, a value parameter 
is a copy of a variable passed to a pro- 
cedure. This copy can be modified by 
the procedure but the changes are not 
passed back to the calling procedure 
when the procedure exits. Variable 
parameters, unlike value parameters 
are passed back to the calling procedure 
as pointers to the variables. Value 
parameters are copies of the variables. 
The MC68000 code for calling pro- 
cedure dojunk begins by initializing the 
stack with the procedure parameters. 
The two "PEA" instructions push the 
pointers to variables "A" and "B". The 
two "MOVE" instructions push copies 
of variables "C" and "D" on the stack. 
The procedure is then called with the 
JSR instruction.' When the procedure 
returns to the calling routine, the space 
made on the stack for the parameters is 
removed with the ADDQ instruction. 

When procedure dojunk (figure 4] is 



Figure 4: Stack Usage for Pascal Procedure Call Example 

~Af [31..16T 



AO 



A7 



A-f (15. .00] 
Bf[31..16] 
Bf[15..001 
C[15..00f 
D[15..0O] 
RTNLINK[31..16] 
RTN LINK [15. .00] 
A0[31..16] OLD 
A0[15..00] OLD 
I[15..00]' 
J[15..00| 
K[15..00] 



VARIABLE PARAMETER POINTERS 



VALUE PARAMETERS 




POINTER TO LOCAL VARIABLES 



■ LOCAL VARIABLE STORAGE 



called, the LINK instruction provides a 
clean way to make room for local vari- 
ables ("i", "j", "k"). The LINK in- 
struction pushes the old value of "AO" 
on the stack, sets "AO" equal to the 
stack pointer, and subtracts the offset 
(in this case three words) from the 
stack pointer. With this technique, 



local variables are referenced with 
negative offsets off "AO" and 
parameters are referenced with positive 
offsets. This technique of using the 
stack supports re-entrant code and 
recursion with no problems. Before do- 
junk exits, it uses UNLK to clear off the 
local variable space it used. 



*•••••••••••• •• •••••••••••••••* 






from 



+ POWER 
COMPUTECH 



All prices 
postpaid 

(Continenta 
U.S.- 
otherwise 
s 2 credit) 




Check the 
outstanding 
documenta- 
tion supplied 
with AIM65! 



Top quality power supply designed to Rockwell's specs for fully 
populated AIM65 — includes overvoltage protection, transient sup- 
pression, metal case and power cable: 

PSSBC-A (5V 2A Reg; 24V .5A Avg, 2.5A Peak, Unreg) .... "64.95 
Same but an extra AMP at 5 volts to drive your extra boards: 
PSSBC-3 (5V 3A Reg; 24V .5A Avg, 2.5A Peak, Unreg) .... 74.95 
The professional's choice in microcomputers: 

AIM65/1K RAM "429.95 BASIC (2 ROMS) "59.95 

AIM65/4K RAM '464.95 ASSEMBLER (1 ROM) "32.95 

FORTH (2 ROMS) "59.95. 

SAVE EVEN MORE ON COMBINATIONS 

AIM65/1K + PSSBC-A ... '479.95 AIM65/4K + PSSBC-3 ..."524.95 
We gladly quote on all AIM65/40 and RM65 items as well. 

ORDERS: (714) 369-1084 

P.O. Box 20054 • Riverside, CA 92516 
California residents add 6% sales tax 



+ 

* 
* 

* 

* 

* 

* 
* 



*••••••*••••• •••••••••••••••••• 



SeaFORTH for the Apple computer 

Is a consistent structured operating system providing the 
advanced programmer with the tool to easily develop 
programs from machine language to high level compiled 
applications. With SeaFORTH, the edit-cornpile-execute- 
edit cycle is measured in seconds, not minutes. 

The integrated SeaFORTH package includes: 

• Editor 

• Disc I/O 

• Assembler 

• Hi-res Graphics 

• Transcendental Floating Point 

• Command Line Input with Editing 

• Detailed 1 50 Page Technical Manual with 

Complete Source Listing! 
Implemented as a true incremental compiler, SeaFORTH 
generates machine code, not interpreted address lists. 
SeaFORTH's direct-threaded-subroutine implementation 
executes faster than interpreted address-list versions. 

Apple SeaFORTH requires a 48K Apple ][ + , with DOS 
3.3. Manual and copyable disk are available for only 
SI 00.00 

Compatible SeaFORTH for the A1M requires a terminal 
and is only available in EPROMs. Manual and EPROMs 
SI 50.00 

Manuals available, separately, for only $30.00 

All prices include UPS shipping. 

VISA or MASTER CHARGE welcome. 

(Dealer Inquiries Welcome) 

TAU LAMBDA 

P.O. Box 808, Poulsbo, Washington 98370 
(206) 598-4863 

Apple ][ + and AIM are registered trademarks of 
Apple Computer and Rockwell 
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Range Checking Using the 
MC68000 

The MC68000 "CHK" instruction 
provides an efficient mechanism to in- 
sure that array bounds are not exceeded 
in high-level language implementa- 
tions. As an example of range checking 
with CHK, consider the problem of en- 
forcing array boundary checking in a 
simple Pascal program. Figure 5 shows 
the stack usage for a simple variable 
declaration using the same scheme 
described in the "Procedure Call" ex- 
ample. The individual elements of the 
array "data" will be accessed by index- 
ing off the pointer "AO". The range 
checking's duty is to insure that we do 
not attempt to access an element of 
"data' ' before its true beginning or after 
element "MAX". The consequences of 
exceeding the array bounds range from 
inadvertently modifying another vari- 
able (such as "i", ")", or "misc") to 
stepping on a subroutine return link! 
Figure 6 shows a simple Pascal state- 
ment to clear the "ith" element of 
"data" and the MC68000 code to ac- 
complish it with the necessary range 
check. The code assumes that register 
"DO" contains the current state of "i". 
The CHK instruction examines the 
lower word in the specified register 
("DO") and generates an error trap if it 
is less than or greater than "MAX". 
Otherwise, the code falls through to 
the MOVE instruction that clears the 
"ith" element of "data". 

Conclusion 

We hope this article has given you 
some insight into the extensive power 
of the MC68000. The 16-bit data bus, 
the 16 megabytes of directly address- 
able memory, the sixteen 32-bit user- 
accessible registers, the powerful in- 
struction set, numerous addressing 
modes, and fast execution speed are 
enough to really get folks excited. 

Future Growth 

The MC68000 is not the only 
member of this powerful microproces- 
sor family. Motorola is taking advan- 
tage of its modular, microprogrammed 
structure to develop other processors 
which are upward and downward com- 
patible to the MC68000. 

The MC68008 is a machine and 
assembly level-compatible version of 
the MC68000 with an 8-bit data and 
20-bit address bus for low-cost systems 
that need the performance of the 
MC68000 and can tolerate a slight 
decrease in throughput for reduced 
system costs. 

With the MC68010, Motorola adds 
virtual machine capabilities to the 



Figure 5: Array Storage on the Stack for the Range Checking Example 



{ sample variable declaration 



Vari,j 
data 



AO 



integer; 

array [0.. MAX] of integer; 

integer; 



_A0[31..16] OLD 
A0[15..00) OLD 



stuff before data array 
{ stuff after data array 



" data|0] 
data|l] 



data[MAX] 



Displacement to "data" array 



Space for "data" array 



Stack area beyond the "data" array 



Figure 6: Example of Range Checking Using the MC68000 

{ Pascal statement to clear the "ith" element of "data" } 
data[i]: =0; { note: i < or i > MAX is a range error!!! } 



MC68000 CODE TO EXECUTE THE ABOVE STATEMENT 

ASSUME DO CONTAINS THE CURRENT CONTENTS OF "i" 
GENERATE A TRAP IF "i" < OR IF "i" > MAX 
CHK #MAX,D0 

HERE IF NO RANGE ERROR OCCURRED 
MOVE.W #0,DISP|A0,D0) CLEAR THE "iTH" ELEMENT OF DATA 



MC68000 architecture. 

A full 32-bit implementation (32-bit 
address and data buses) of the architec- 
ture with an enhanced instruction set 
and on-board cache is in design. The 
part will be designated the MC68020 
and will contain all of the additional 
features of the MC68010. 

A full complement of peripherals 
for the MC68000 family have been in- 
troduced or are in development. These 
include a Direct Memory Access con- 
troller (MC68440), a Memory Manage- 
ment Unit (MC68451), a Floating Point 
Arithmetic Co-processor (MC68881), 



and several data communication parts. 
Because of this commitment to the 
continuation and enhancement of the 
MC68000 family, systems and soft- 
ware for the MC68000 are insured a 
long useful life. 

References 

1. "16-Bit Microprocessor User's 
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FOUR TO GROW 



£ 




Four software packages, that is, to 
make your Apple® computer really 
grow! Versatility is the key to com- 
puting success, and with Advanced 
Operating Systems, it's as easy as 
one, two, three. 

APPLE-AIDS is a collection of 12 
Applesoft and machine language 
programs designed to bring you 
greater flexibility and control over 
your microcomputer. 

In addition to several programs 
which allow you to examine and 
change various track/sector con- 
tents, format new disks, and create 
and edit EXEC files, APPLE-AIDS in- 
cludes two programs you can't af- 
ford to be without. UNDELETE FILES 
allows you to recover accidentally 
deleted files which you thought 
were lost forever. KILL DOS removes 
DOS from any disk freeing up more 
space for your programs or data. 

Russ Adams, a reviewer for INFO- 
WORLD, writes, "Its (APPLE-AIDS) 
documentation is the finest I have 
seen since joining the INFOWORLD 
Software Review Board." Ease of 
use and extensive documentation 
make APPLE-AIDS a valuable addi- 
tion to every Apple software library. 
#26066, $49.95 



HELLO CENTRAL! changes your 
Apple \f s or Apple II Plus 5 into a 
highly versatile communications 
center. 

Establish direct communications 
with other computers of any make 
or tap into the wealth of informa- 
tion available from the hundreds of 
public-base services like THE 
SOURCE. 

HELLO CENTRALIS most unique fea- 
ture is its text buffer. Messages or 
entire files can be uploaded and 
downloaded into the text buffer 
which holds up to 18,000 characters. 
The buffer text can be scanned, 
changed, and then saved to disk. 

The best thing about HELLO CEN- 
TRAL! is that you don't have to be a 
professional to get professional re- 
sults. A few simple keystrokes will 
accomplish any of your text/com- 
munications tasks. #26081, $99.00 

MUSIC GAMES skillfully combines 
the sound and high resolution 
graphics of the popular Apple com- 
puter to provide both visual and 
audible reinforcement to the study 
of music. Twelve different pro- 
grams, selected from a menu, cover 
ear training, note recognition and 
writing, rhythm practice, and listen- 
ing enjoyment. These versatile 
games are written for ages 5 
through adults. #261 16, $39.95 



PEN PAL gives you the power and 
versatility of higher-priced word 
processors in an easy-to-use format. 
With only 29 commands, you can 
quickly and easily create lengthy 
reports or short memos. PEN PAL 
gives you 40- and 80- column screen- 
ing, joystick control of the cursor for 
quick editing, complete printer con- 
trol, plus both upper and lower case 
capabilities. PEN PAL is the afforda- 
ble solution to your word process- 
ing needs. #25115, $59.95 

Advanced Operating Systems has 
four good ways to make you and 
your Apple grow and grow! 

Now available at your local 
software retailer, or call 1-800-428- 
3696 to order. (Indiana residents, 
call (317) 298-5566.) MasterCard 
and VISA accepted. 

ADVANCED 
OPERATING 
SYSTEMS 

4300 West 62nd Street 
P.O. Box 7092 
Indianapolis, IN 46206 

A Division of 

Howard W. Sams & Co., Inc. 

Apple, Apple II and Apple II Plus are registered 
trademarks of Apple Computers, Inc. 



AARDVARK - THE ADVENTURE PLACE 

ADVENTURES FOR OSI, TRS-80, TRS-80 COLOR, SINCLAIR, PET, VIC-20 



ADVENTURES — Adventures are a unique 
form of computer game. They let you spend 
30 to 70 hours exploring and conquering a 
world you have never seen before. There is 
little or no luck in Adventuring. The rewards 
are for creative thinking, courage, and wise 
gambling — not fast reflexes. 

In Adventuring, the computer speaks and 
listens to plain English. No prior knowledge 
of computers, special controls, or games is re- 
quired so everyone enjoys them — even people 
who do not like computers. 

Except for Quest, itself unique among Ad- 
venture games, Adventures are non-graphic. 
Adventures are more like a novel than a comic 
book or arcade game. It is like reading a par- 
ticular exciting book where you are the main 
character. 

All of the Adventures in this ad are in Basic. 
They are full featured, fully plotted adventures 
that will take a minimum of thirty hours (in 
several sittings) to play. 

Adventuring requires 16k on Sinclair, TRS- 
80, and TRS-80 Color. They require 8k on OSI 
and 13k on VIC-20. Sinclair requires extended 
BASIC. 

TREK ADVENTURE by Bob Retelle - This 
one takes place aboard a familiar starship and 
is a must for trekkies. The problem is a famil- 
iar one — The ship is in a "decaying orbit" 
(the Captain never could learn to park!) and 
the engines are out (You would think that in 
all those years, they would have learned to 
build some that didn't die once a week). Your 
options are to start the engine, save the ship, 
get off the ship, or die. Good Luck. 

Authors note to players — I wrote this one 
with a concordance in hand. It is very accurate 
— and a lot of fun. It was nice to wander 
around the ship instead of watching it on T.V. 

CIRCLE WORLD by Bob Anderson - The 

Alien culture has built a huge world in the 
shape of a ring circling their sun. They left 
behind some strange creatures and a lot of ad- 
vanced technology. Unfortunately, the world 
is headed for destruction and it is your job to 
save it before it plunges into the sun! 

Editors note to players — In keeping with 
the large scale of Circle World, the author 
wrote a very large adventure. It has a lot of 
rooms and a lot of objects in them. It is a very 
convoluted, very complex adventure. One of 
our largest. Not available on OSI. 

HAUNTED HOUSE by Bob Anderson - This 
one is for the kids. The house has ghosts, gob- 
lins, vampires and treasures — and problems 
designed for the 8 to 13 year old. This is a 
real adventure and does require some thinking 
and problem solving — but only for kids. 

Authors note to players — This one was fun 
to write. The vocabulary and characters were 
designed for younger players and lots of things 
happen when they give the computer com- 
mands. This one teaches logical thought, map- 
ping skills, and creativity while keeping their 
interest. 



DERELICT by Rodger Olsen and Bob Ander- 
son — For Wealth and Glory, you have to ran- 
sack a thousand year old space ship. You'll 
have to learn to speak their language and 
operate the machinery they left behind. The 
hardest problem of all is to live through it. 

Authors note to players — This adventure 
is the new winner in the "Toughest Adventure 
at Aardvark Sweepstakes". Our most difficult 
problem in writing the adventure was to keep 
it logical and realistic. There are no irrational 
traps and sudden senseless deaths in Derelict. 
This ship was designed to be perfectly safe for 
its' builders. It just happens to be deadly to 
alien invaders like you. 



ifet 




PYRAMID by Rodger Olsen - This is one of 
our toughest Adventures. Average time 
through the Pyramid is 50 to 70 hours. The 
old boys who built this Pyramid did not mean 
for it to be ransacked by people like you. 

Authors note to players — This is a very 
entertaining and very tough adventure. I left 
clues everywhere but came up with some in- 
genous problems. This one has captivated 
people so much that I get calls daily from as 
far away as New Zealand and France from 
bleary eyed people who are stuck in the 
Pyramid and desperate for more clues. 

QUEST by Bob Retelle and Rodger Olsen - 

THIS IS DIFFERENT FROM ALL THE 
OTHER GAMES OF ADVENTURE!!!! It is 
played on a computer generated map of 
Alesia. You lead a small band of adventurers 
on a mission to conquer the Citadel of Moor- 
lock. You have to build an army and then arm 
and feed them by combat, bargaining, explora- 
tion of ruins and temples, and outright ban- 
ditry. The game takes 2 to 5 hours to play 
and is different each time. The TRS-80 Color 
version has nice visual effects and sound. Not 
available on OSI. This is the most popular 
game we have ever published. 

MARS by Rodger Olsen — Your ship crashed 
on the Red Planet and you have to get home. 
You will have to explore a Martian city, repai r 
your ship and deal with possibly hostile aliens 
to get home again. 

Authors note to players — This is highly 
recommended as a first adventure. It is in no 
way simple — playing time normally runs from 
30 to 50 hours — but it is constructed in a 
more "open" manner to let you try out ad- 
venturing and get used to the game before 
you hit the really tough problems. 



NUCLEAR SUB by Bob Retelle - You start 
at the bottom of the ocean in a wrecked Nu- 
clear Sub. There is literally no way to go but 
up. Save the ship, raise her, or get out of her 
before she blows or start WWIII. 

Editors note to players — This was actually 
plotted by Rodger Olsen, Bob Retelle, and 
someone you don't know — Three of the nas- 
tiest minds in adventure writing. It is devious, 
wicked, and kills you often. The TRS-80 Color 
version has nice sound and special effects. 

EARTHQUAKE by Bob Anderson and Rodger 
Olsen — A second kids adventure. You are 
trapped in a shopping center during an earth- 
quake. There is a way out, but you need help. 
To save yourself, you have to be a hero and 
save others first. 

Authors note to players — This one feels 
good. Not only is it designed for the younger 
set (see note on Haunted House), but it also 
plays nicely. Instead of killing, you have to 
save lives to win this one. The player must 
help others first if he/she is to survive — I like 
that. 

Please specify system on all orders 




ADVENTURE WRITING/DEATHSHIP by 
Rodger Olsen — This is a data sheet showing 
how we do it. It is about 14 pages of detailed 
instructions how to write your own adven- 
tures. It contains the entire textof Deathship. 
Data sheet - $3.95. NOTE: Owners of OSI, 
TRS-80, TRS-80 Color, and Vic 20 computers 
can also get Deathship on tape for an addi- 
tional $5.00. 

PRICE AND AVAILABILITY: 

All adventures are $14.95 on tape except 
Earthquake and Haunted House which are 
$9.95. Disk versions are available on OSI and 
TRS-80 Color for $2.00 additional. 



ALSO FROM AARDVARK — This is only a partial list of what we carry. We have a lot of other games (particularly for the 
TRS-80 Color and OSI), business programs, blank tapes and disks and hardware. Send $1.00 for our complete catalog. 




AARDVARK -80 

2352 S. Commerce, Walled Lake, Ml 48088 

(313)669-3110 

Phone Orders Accepted 8:00 a.m. to 4:00 p.m. EST. Mon.-Fri. 
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A Monitor for 
the Color Computer 



by Ralph Tenny 



This article provides step-by- 
step instructions to get 
composite video from the video 
section of the Color Computer. 
You will use this signal to drive 
a standard video monitor 
instead of a color or black-and- 
white TV set. 



Required: 

TRS-80 Color Computer 
A monitor-quality CRT 



The Radio Shack Color Computer, an 
excellent low-cost computer, uses a 
color TV set as the intended display 
device. Unfortunately, TV sets have 
relatively low resolution, which limits 
the clarity of the display. The use of a 
TV set can be either good or bad, de- 
pending on whether color graphics are 
used in your program. Since I use it as a 
text processing system, I need a video 
terminal with maximum display clari- 
ty. Even the relatively low character 
density of the Color Computer's video 
output isn't very clear on the average 
TV set — either color or B&W. The 
signal itself is of high technical quality, 
and a higher-resolution display can 
make a great improvement in the read- 
ability of the display. If a B&W monitor 
is substituted for the TV set, this goal is 
achieved. As you can see from photo 1, 
my video monitor (which is not a 
super-high resolution unit) gives an ex- 
cellent display capability when used 
with the Color Computer. 

Since the remainder of the article 
describes a process of modifying the 
Color Computer, you should realize 
that any internal modifications will 
probably void the warranty. If the com- 
puter is more than three months old, 
the warranty will have expired. If you 
modify the computer and it needs 
repair, you may have to remove the 
modification before Radio Shack will 
repair it. I have not had any problems in 



over a year, and I still feel comfortable 
with my decision. 

The Color Computer's video output 
is a complete TV signal and is gener- 
ated by a very low-power TV trans- 
mitter mounted within the Color Com- 
puter. Part of the display problem is the 
fact that the TV tuner is deliberately 

10 nm TftfTST 

15 OPT S9 

28 ORG S7BM ,;. 

25 * THIS PRQGRftH WRITES A FftTTE 
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30 ♦ CHECKING FDR TftPE ERRGRS AN 
jE STOPPING UH ERRORS. 

[35 ♦ the write function is ah eh 
(©less loop, 6hb host. be stoppeb 
Niks reset. 1 .-'■' 

Photo 1: A close-up look at a Color 
Computer display on a video monitor. 
Note that each pixel is a sharply- 
defined square. 



limited, therefore the signal must also 
be limited. Even if the tuner is by- 
passed, the TV's display resolution is 
reduced as a cost-saving measure, since 
high resolution is not required for nor- 
mal TV viewing. 

The Color Computer uses an 
MC6847 Video Display Generator to 
produce all the signals required to drive 
a TV set; these include composite sync, 
blanking, video luminance, and color 
information. The basic approach is to 
use a buffer amplifier to process the 
output of the MC6847, enabling the 
signal to be fed directly to a video 
monitor. Figure 1 shows the schematic 
of this buffer amplifier; it was patterned 
after circuitry suggested by Motorola, 
the manufacturer of the 6847. This 
amplifier was built on thin, two-sided, 
copper-clad board with one side etched 
into small pads. Figure 2 is a full-size 
layout of the amplifier board, and figure 
3 shows the parts layout. 

Access to the Color Computer is 
easy and requires only that you take 
out seven screws to remove the top. 
Note that one screw is located beneath 
a factory seal. If you remove this screw 
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Figure 1: Schematic for the video buffer amplifier, which mounts internal to the 
computer. It amplifies the video output of the 6847 and turns it into a low- 
impedence signal suitable for driving a cable to the external monitor. 
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Figure 2: Full-size layout of the 
amplifier board. Make the board by 
etching the lines shown to divide the 
board into eight segments as shown. 
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Photo 2: Interior view of the area where the amplifier will be mounted. The long IC Is 
the MC6847, which will be covered by the buffer amplifier as shown In photo 3. 




Photo 3: A view of the buffer amplifier mounted, with the output cable attached. 




Photo 4: Oscillogram of the output video 
showing one video frame. 
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Photo 5: An oscillogram of three lines of 
horizontal video. 
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you will deface the seal, which voids 
your warranty. 

Once you loosen the screws, put a 
piece of tape over each hole so the 
screws will not fall out when you turn 
the computer upright. With the screws 
loosened, the top will lift off, leaving 
the keyboard resting on standoffs and 
revealing the inner RF shield. 

Note that the top of the shield is a 
friction fit to the shield sides via 
numerous spring-loaded fingers. Work 
the shield top off by lifting it a little bit 
all around; keep lifting until it lifts 
straight off. Once you can see inside, 
find the MC6847 and MC1372 ICs as 
shown in photo 2. Also, in photo 2, you 
will note a solid ground wire curving up 
over the 6847, plus a heavy wire com- 
ing from one side of C26 and smaller 
wire coming off the circuit board be- 
tween C42 and the 1372. The solid 
wire is circuit common, the large wire 
is + 5 volts, and the small wire is the 
signal input to the buffer board. Photo 3 
shows the video buffer installed, 
resting on the 6847. The large wire has 
been soldered to the +5 volt input of 
the buffer board, the ground wire to the 
amplifier common, and the small wire 
to the amplifier input. A small 
183-ohm cable has its shield soldered 
to the amplifier common and the 
center conductor to the amplifier out- 
put. The other end of the 183-ohm 
cable runs across to the corner of the RF 
shield (the top left corner of the shield 
as seen from the front of the computer). 



Parts List for 

Video Buffer Amplifier Circuit 

C3 68 pF dipped mylar 

capacitor 
Rl 33K ohm, !4 -watt resistor 

R2 62K ohm, W-watt carbon 

resistor 
R3 5. IK ohm, l A -watt carbon 

resistor 
R4, R5, R6 51 ohm, V* -watt carbon 

resistor 
Ql, Q2 2N2222 NPN transistors 
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Figure 3: Parts layout for the amplifier board. Each part is soldered Into place in 
the approximate location sketched. 



Once the amplifier is in place, turn on 
the computer and check the video out- 
put from the cable. Photo 4 shows one 
vertical frame of video, and photo 5 
shows three horizontal lines of video. If 
your amplifier does not have similar 
output, double-check the circuit and 
adjust C2 until the response is correct. 
After testing the amplifier, send its 
output into a video monitor and make 
whatever level adjustments are needed 



to obtain a good picture. Once the 
monitor is working, re-install the com- 
puter cover and enjoy your computer's 
new display. 



You may contact the author at P.O. Box 
545, Richardson, Texas 75080. 
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OHIO SCKHTIHG 

THE WIZARD'S CITY — 

search for gold in the dun- 
geons beneath the Wizard's 
city or in the surrounding 
forest. A dynamic adventure 
allowing progress in strength 
and experience. All OSI — 
cassette $12.95, disk $15.95. 

OSI HARDWARE 15% OFF 
RETAIL PRICES! 

GALACTIC EMPIRE - a strat- 
egy game of interstellar con- 
quest and negotiation. Com- 
pete to discover, conquer, and 
rule an empire with the com- 
puter or 1-2 other players. C4P, 
C8P cassette $12.95, disk 
$15 95 

AIR TRAFFIC ADVENTURE - 
a real time air traffic simula- 
tion. C4P, C8P disks $15.95. 
Plus S-FORTH, PACKMAN, 
CRAZY BOMBER, ADVEN- 
TURE, TOUCH TYPING, IN- 
TELLIGENT TERMINAL and 
more. Send for our free 
catalog including photos and 
complete descriptions. 
(312)259-3150 

Aurora Software Associates 

B37 S. Mitchell 
Arlington Heights 
h^B Illinois 60005 



Olympic sal6s cotefc^ 



Telex: 67 34 77 Tall-Free Phone Orders: 
Toll-free v« ca) 800 252-2153 100-421-8045 (out of CAI 
Order Desks open 8 days a week! 7:00 AM to 6:00 PM Mon Sal 
P.O. 80x74545 21 6 So. Oxford Ave. Los Angeles, CA 90004 
Phone: (213) 739-1130 Cable: "OlYRAV" LSA 



m 



HEWLETT 
PACKARD 



LCD 




HP-16C Computer Scientist - 
for Programmers & Digital 
Designers 127.50 WE ARE AUTHORIZED 
FULL LINE HP Dealers. 



HP-10C 

Up to 79 

lines of 

program 

storage 

RE:$80.00 

$80.00 

Your Cost: 

$69.95 



We carry close to 
SS.OOOMQ inventory at all 
" — t. Corp. accts. invited. 



Good subject to availability; this ad supercedes 
all previous ads; fob our warehouse; price* sub- 
ject to change without notice; not responsible 
' errors; alt orders subject to 

n shpg a hndtg SSS~ 

in) for 



typographical 

—Jfication; minii „ _ 

Send $2 lor $5 foreign) for our famous catalog. 



(Specify serial 
or parallel) 



TP-I 
TEXT PRINTER 

rc:S99s.oo Daisy 

*669 95 32 

Smith-Corona 



BMC 12" 
Green 
Monitor 

Model BM-12A 

$0095 




Texas Instruments 

TI-5010 

Handheld Calculator 

Plain paper printer 

$39.95 



Texas Instruments 
Home Computer 

TI-99/4A, 



lII#»jHr>af \ffl YOUR COST: 

VKrlUn $395.00 

VICTOR 5080 80 Column Printer 

A real work horse! 100 cps, graphics, 

buffer, 4 interfaces including HP-IB 

Retail: $995.00 Wfaolesale:S670.00 

Fully guaranteed by Victor, in business 

since 1918 



ATARI®COMPUTERS 



ATARI 800-16K 647 Si 

ATARI 80048K (Axlon 32K chip) 779 .95 
Atari 810 Disk Drive 459.95 

Atari Interface Module 177.95 

Atari Educator Kit 11735 



0KIDATA PRINTERS 

82A Bi-directional 444.95 

83A Bi-dir^nal/oaralle! 694.95 

84 Parallel, 200 CPS 1144J5 

84 Serial. 200 CPS 1274.95 



EXTEND-A-PH0NE 

EX-4000 Cordless Speaker Phone 

Re:S229.95 Y/C:$1 63.95 




Olivetti *" 

"PRAXIS 35" * ,M^ • ^^ 
ELECTRONIC TYPEWRITER 
Interchangeable 'Daisy 
Wheel' type element, 
3 sizes-Pica, Elite & Micro 
plus cartridge ribbon & more 

Retail: $750.00 



PRICE 
BREAK-THROUGH! 
Cordless Telephone 

KP6100 

$0095 





.Now 
Only 



$10095 AFTER MFC'S 

IJv REBA TE-you pay 
OSC $299.95, Tl rebates you $100. 

Plus FREE $50 RF Modulator 

with purchase of TI-99/4A 

Call & ask about FREE Speech 
Synthisizer OFFER! 



Model 61000 with automatic dialing 
10 memories Y/C:S118\95 




ATARI 400-16K 

$199.95* 

* You pay OSC $259.95 & receive a coupon 

worth up to $60 in rebates from Atari on 

the purchase of add 'I software or 

accessories for the Atari 400. 



£ E commodore 

VIO20 

FREE RF Modulator 

with purchase of VIO20 

WorkiwrthanyTV! 
5K Personal Computer 
(Expands to 32K) 
We are authorized FULL- 
LINE Commodore dealers. 




$197.95 



Your Cost: 

Retail: $300.00 

Model 1 540 Single SV/'Drive 334.95 

Model 1515 Graphics Printer 329.95 

Model 1 530 Datasette Recorder 59.95 



LEX-21 $ 
Portable 

Terminal irxn-xi*' 
LEXICON 



995 




SHARP 

HAND-HELD 

COMPUTERS 
PC 1500 Pocket Computer 
CE 150 Color graphic printer w/cass. interface 
4K Expansion module 
8K Expansion module 



213.95 

173.95 

53.95 

103.95 



$ SANYO 

High resolution, number one seller! 



MONITORS 



VM45M 

VM4215 

DM5109 

DM8012 

DM8112 

OMC6013 

DMC6113 

DM2012 

DM2112 



9"B&W 

15"B&W(helow our cost) 

9" Green 

12"B&W 

12" Green 

13" Caior, hi quality 

13" Color RGB hi res 

(NEWM2"B&W 

(NEW) 12" Green 



Retail Cost 
1 90.00 159.95 
349.00 189.95 
20000 169.95 
250.00199.95 
260.00 209.95 
470.00 399.95 
995.00 799.95 
179.00139.95 
199.00159.95 



10" color monitor high res 339.95 

32K memory module 314.95 

Extended Basic 75.00 

Speech synthesizer 129.95 

Disk memory drive 394.95 

J Telephone coupler (modem) 1 89.95 

' Printer (solid state) 319.95 

TIL0G0 99.95 

Tl EXPANSION BOX SYSTEM 

PHP 1200 Expansion Box 209.95 

PHP 1220 RS232 136.00 

PHP 1240 Disk Controller 194.00 

PHP 1250 Disk Drive 299.00 
PHP 1260 32K Mem. expansion 234.00 

PHP 1270 Pascal Card 194.00 

Programmable TI-59 
Your Cost:$1 69.95 plus- 
$20.00 rebate from Tl plus Free Library 
Tl LCD Programmer 59.95 
WE ARE AUTHORIZED FULL 
LINE Tl DEALERS 



APPLE COMPUTER 

48K Plus 1069.95 

Disk dr w/controller 494.95 

Disk dr - no controller 419.95 

Apple 2 System package 1 695.00 
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FOR COMPLETE GRAPHICS: 

UersaWriter 



EDUCATION 



ARTIST 



GAME PROGRAMMER 




Whether you are a 
teacher, an artist, an 
engineer, a 
programmer, or a 
hobbiest with little or no 
programming experience, 
the VersaWriter is the ■ 

answer to your graphics | 
need. With the VersaWriter 
exploring the world of micro 
computer graphics is as easy ! 
as tracing. The VersaWriter 



doesn't just trace 
picture though. With 
simple one key com- 
mands you can add 
color and text to your pic- 
tures, move objects across 
the screen, make scale 
drawings and even draw 
with different size brushes. 
The VersaWriter is as limitless 
as your imagination. 



For complete graphics on your Apple II/II+, or IBM PC, the Versa Writer from Versa Computing, Inc. is your answer. 
Complete hardware/ software system ready for use - $299. 



Send for information 
on the complete line 
of v£«i\«Hs & Graphics 
Products 




VEttA 

compiiLine, inc. 



Dealer 

Inquiries 

Welcome 
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3541 Old Conejo Road, Suite 104 • Newbury Park, CA 91320 • (805)498-1956 
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FLEX and the TRS-80 
Color Computer 



by Ronald W. Anderson 



Here is a brief description of the 
FLEX09 operating system as 
implemented on the TRS-80 
Color Computer. 

The configuration described here is 
available from Frank Hogg Laboratories 
(130 Midtown Plaza, Syracuse, NY 
13210] with 64K or RAM installed 
($1275), as well as an assortment of 
disk drive packages. If you already have 
a TRS-80, then Frank Hogg Labora- 
tories sells the operating system and 
modification instructions separately 
($99). While it is possible to run the 
FLEX operating system with one disk 
drive, two are recommended. You may 
choose from a minimum package of 
one single-sided, double-density, 
35-track drive, or up to three double- 
sided, double-density, 40-track drives. 
The latter will hold up to 375K of data 
on each drive. You may also use one of 
the 80-track, double-density drives and 
have over 700K bytes on one disk, 
although the 80-track version is not 
compatible with Radio Shack's disk 
operating system. 

FLEX is the standard operating 
system for 6800 and 6809 systems. 
FLEX is so universal that there are ver- 
sions that will run on the Motorola Ex- 
orciser. FLEX is a "Unix-like" 
operating system and has a nice set of 
calls that do all the work to interface 
your assembler program to the disk 
drivers. There are literally 100 utility 
programs available for FLEX. 

The manual that comes with the 
operating system is basically the FLEX 
operating system manual with addi- 
tional pages that apply to the Color 
Computer. There is a well-written sec- 
tion on getting your system up and run- 
ning. First you configure the software 
to match your hardware. The system 
boots up expecting 35-track, single- 
sided drives. To access more tracks or 
double-sided drives, you must run a 
utility program that will tell the 



system you have 40 tracks and double- 
sided drives, for example. Your drives 
need not all be alike. You may specify 
drive as being single-sided and having 
35 tracks, and drive 1 as being double- 
sided and having 40 tracks. Although 
this might seem like a nuisance, you 
only need to run the utility program 
once. This generates a command file 
that is appended to FLEX containing in- 
formation on your drives, the terminal, 
and drivers for your printer. 

I did a bit of experimenting with the 
SETUP command that does all the con- 
figuring, and discovered I could specify 
"reverse video," which is really "nor- 
mal video' ' to anyone who has worked 
in front of a terminal for any time. I 
find a blinking cursor to be distracting, 
so I made it a plain block cursor. Now 
my system will power up just the way I 
want it. 

Another feature is the keyboard's 
ability to provide all the ASCII codes. 
The control codes, such as Control C, 
are generated by holding the shift and 
up arrow simultaneously [equivalent of 
the control key on a terminal), and 
then pressing the desired key, C for ex- 
ample. If you ever program in Pascal 
and/or "C", you will need several 
characters that are not included on the 
Color Computer keyboard. 

Without going into detail, I will 
give an example of the key assignments 
and how to access them. You may 
remember that upper case (SHIFT) 8 is 
a left parenthesis "(", and SHIFT 9 is a 
right parenthesis ")". Use the CON- 
TROL combination (SHIFT A ) and 
type 8 and you get a left square bracket 
"[". SHIFT A 9 a nd you get a right 
square bracket "]". "C" requires the 
use of curly braces. SHIFT A BREAK 8 
will cause a left brace "{" to be 
generated, and the same combination 
for a 9 will generate a right curly brace 
"}". The control and shift keys are 
depressed first, and are all held 
simultaneously before keying the 8 or 



9. Holding three keys down and typing 
a fourth is not easy, but it's better than 
not being able to generate the code for 
those characters. 

Sometimes disk drives run slightly 
fast, or irregularly, and squeezing the 
sectors close enough to get 18 on a 
track results in unreliable disk access. 
There is a NEWDISK utility that will 
automatically reduce the number of 
sectors to 17 if it encounters problems. 
Another NEWDISKA utility will put 18 
sectors on closer together. I have had 
no trouble using NEWDISKA. A sector 
in the FLEX system is 256 bytes long, 
but four bytes are used for system pur- 
poses, so a sector actually holds 252 
bytes of data. A single-sided, 35-track 
disk will hold 612 sectors (using 
NEWDISKA). If your drive has 40-track 
capability, you will get 702. A double- 
sided 40-track will result in 1404. If 
these numbers don't seem to add up 
correctly, it is because FLEX uses the 
first track (track 0) for a loader, disk 
system information record, and file 
directory sectors. Also, FLEX requires 
that track always be single density. 
Therefore, the tracks actually available 
to the user are one less than the total 
number on the disk. 

Once FLEX is running, make 
another copy of the system disk. Use 
NEWDISK or NEWDISKA to format a 
blank disk, and then use a utility called 
PUTBOOT.LDR to install the loader 
on the disk. The loader is readable by 
the Color Computer disk operating 
system. It loads a short program that 
loads and executes a longer loader pro- 
gram that loads all of the FLEX 
operating system. It sounds com- 
plicated but only takes a few seconds to 
execute. You must put the boot loader 
on your disk first. If you have copied 
any files onto the newly formatted 
disk, there is a chance that the system 
may have allocated you space where 
the boot loader needs to be. PUTBOOT 
will inform you that you can only in- 
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PROFESSIONAL 

WORD PROCESSOR 



FOR APPLE/PET/CBM 

COPY-WRITER 

only S1 85.00 



EXCHANGE DATA w IBM 3740 

PEDISK II 877 FLOPPY DISK Sys- 
tems can now read and write records 
,'; from IBM "Basic Data Exchange" 

^t.".. ' " typo- diskettes. FILEX software from 
'*•'' WfLSERVE does all the work! Con- 
^^-«.!..:vorts EBCDIC • ASCII. 

EXCHflW atSyile m (877/FILEX) $1 295. 

PEDISK 877-1 8' Floppy for PET $ 995. 

PEDISK 540-1 5' Floppy for PET $ 595. 

CONTROLLER BOARD w PDOS $ 229. 

PEDISK II is a high performance floppy disk 
system designed for the Commodore PET/CBM, 
Rockwell AIM and Synertek SYM. It features high 
performance, simple reliable design and IBM for- 
mat. 

SOFTWARE FOR PEDISK II 

COPYWRITER Pro Word Processor $1 85. 

MAE Macro Assembler Editor by EHS $1 70. 

FLEXFILE II Data Base Manager $ 80. 

PAPERMATE Word Processor $ 60. 

DISK UTILITY PACK $ 25. 

FASTFILE Data Base $1 00. 

FILEX IBM Access Routines $245. 

MENU LOAD $ 10. 

fullFORTH+ $100. 



Commodore Communicates 1 

COMPACK $129. 



telligent Term 
eluding: ACIA 



Teminal Package 
ACIA based interface 
DB25 cable 
STCP software 

lemetry > XON XOFF Co 



$139 COLOR CHART 

AIM/SYM system video display, 64 x 1 6 

characters, 8 colors, plugs into ROM 

socket, 4K RAM Multiple modes; semi 

graphics, alpha. 

PET/CBM color graphic display, 1 28 x 

1 92 pixels, generate color bar graphs 

on one screen with data on main 

screen. RS170 video color chart. 

6847 based video output. 

COLOR VIDEO FOR PET/CBM/AIM/SYM 



ROMSWITCH-4 ROMS IN 1 

SPACEMAKER $39.95 

Switch 4 ROMs into the same socket 
A slide switch activates one of four 
Electronic controls insure no glitches 
and allow ROM switching under soft- 
ware control ROMs can be switched 
from the keyboard 

fiillFORTH+ for APPLE/PET 

FULL FIG FORTH implementation plus 
conditional assembler, floating point, 
string handling, multi-dimensional arrays, 
and disk virtual mamory 
fullFORTH+ from IDPC Co S100 

Target Compiler ! 



SEE YOUR DEALER OR: 



(MICROTECH] La 

DEALER INQUIRIES INVITED 



P.O Box 102 
Langhorne, Pa. 1 9047 
215-757-0284 



stall the loader on a newly formatted 
disk, and quit. 

After installing the loader, you may 
copy everything from the system disk 
to your new system disk except the 
loader installation utility PUT- 
BOOT. LDR. An attempt to copy it will 
get you a DISK SPACE FULL error and a 
lot of garbage on your disk. If you try to 
GET PUTBOOT.LDR (for those of you 
not familiar with FLEX, GET is a utility 
that reads a disk file to memory but 
doesn't execute it), you will find that it 
tries to execute, finds that you haven't 
specified a drive number, and erases 
itself from memory before returning to 
FLEX. Unless you enjoy "puzzles" and 
are quite familiar with FLEX and the for- 
mat of binary files, you will have to use 
your master disk to make all further 
system disks. 

Having copied all the supplied files 
to your system disk, you must run one 
further utility, called LINK. LINK will 
tell the boot loader just where on the 
disk the file FLEX. SYS is located. My 
advice is to make two system disks, and 
hide the master and one of them in a 
safe place where they won't get hot, 
bent, or damaged by a magnet. When 
you wipe out your working system disk 
you can get the backup and generate 
another backup for the safe storage area. 

The video display looks like a ter- 
minal. Most terminals accept control 
codes to do such things as clear the 
screen, position the cursor for the next 
letter to be output, etc. A set of such 
codes has been provided. You can con- 
trol the display without getting into the 
assembler-level CRT driver code. That 
will make it easier for software suppliers 
to write compatible software for the 
Color Computer. 

The Color Computer format is 16 
lines of 32 characters each, and the 
character generator displays lower case 
in reverse video, which is barely usable. 
Software will soon be available to allow 
use of any standard ASCII RS-232 ter- 
minal on the serial port of the Color 
Computer. I have a preliminary version 
of the software which will eliminate the 
display problem completely, but I im- 
agine that many purchasers will want to 
use a TV set and the supplied keyboard 
for some time, before investing in a ter- 
minal. The enhanced display software 
will therefore be welcome. 

A SDC (single disk copy] utility 
allows copying with a single drive. It 
reads files from the source disk until 
memory is full or it has read all the files 
to be copied, then it prompts you to in- 
sert the destination disk for a write cy- 
cle, etc., until the copy is complete. 
LINK and PUTBOOT.LDR both prompt 
you, and therefore give an opportunity 
to change disks so these operations may 



be performed with a single disk drive 
also. 

The HELP utility and file help you 
find or remember FLEX commands. If, 
for example, you type HELP,NEWDISK 
you will get a brief description of what 
the NEWDISK utility does, and a 
reference to a page in the manual. 

If you have a serial printer, you will 
have no trouble configuring the system 
so you can use it effectively. A parallel 
printer will require a serial adaptor of 
some sort. Epson provides one for their 
printers, and Computerware of En- 
cinitas, CA, offers one for about $60. 

Of course you can run Radio Shack 
Extended Disk BASIC, which comes in 
the Color Computer in ROM. The RS 
disk operating system is well thought 
out. Both Random Access and Sequen- 
tial files are implemented. Since the 
Color Computer comes up running the 
BASIC from ROM, you might wonder 
where the operating system is. Actually, 
it is part of BASIC. While running 
BASIC you may DIR a disk (prints the 
directory of a RS disk). You may copy 
or back up a disk, load and save pro- 
grams (either BASIC or machine lan- 
guage), and still in BASIC, you may 
read or write any sector on the disk by 
specifying the track and sector number, 
and the ID of two string variables. The 
first 128 bytes of the sector is read 
to/written from the first named string 
variable, and the last 128 bytes to/from 
the second. That means you can write 
your own disk system and have fast ac- 
cess! Naturally, the RS BASIC has all 
the color graphics commands and 
sound commands, so you can write 
game programs and/or use graphics. 

The Color Computer is a good buy 
for anyone wanting to get into this ex- 
pensive hobby with a small invest- 
ment. If you have the minimum 
system from RS, which is very inexpen- 
sive, you can first have RS upgrade your 
Color Computer to 32K, and then do 
the very simple modification to 64K. 
From that point, you are off into the 
world of FLEX, with at least five Pascal 
compilers, three or four BASIC inter- 
preters, several versions of "C", For- 
tran, Cobol, a couple versions of 
FORTH, three editors, a good text pro- 
cessor, several assemblers, an excellent 
debugger program for assembler pro- 
grams, and much more. 



Mr. Anderson is vice president in charge of 
engineering for Industrial Computer 
Controls Corp. in Ann Arbor, MI. You 
may contact him at 3540 Sturbridge Ct., 
Ann Arbor, MI 48105. 
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FOR YOUR APPLE II 

Industry standard products at super saver discount prices 





PARALLEL PRINTERS 
NEC 8023 or C-ITOH 8510 

(Virtually identical) Specifications: • 100 CPS dot 
matrix printer • 80 column print- 136 characters 
per line • Tractor/friction feed • 7 different print 
fonts included • 2K printer buffer • Proportional 
spacing • Bit image graphics and graphic symbols. 

NEC 8023 or C-ITOH $495 

NEC 8023 or C-ITOH 8510 with 

Parallel Interface and Cable $550 

EPSON 100 with Parallel Interface 

and Cable $749 



Z-80 CARD FOR YOUR APPLE 
MICROSOFT SOFTCARD 

With CP/M" and MBASIC. 

(List: $399) $289 

t-ll*' Best Buy!!! 

< lm ADVANCED LOGIC SYSTEM 

■'W lk Z-CARD WithC-PM- 

Has everything the Softcard has except MBASIC. 
Works with Microsoft's disks too. 

(List $269) Special at $195 

ALS SYNERGIZER 

CP/M" operating package with an 80 column 
video board, CP/M - interface, and 16K memory 
expansion for Apple II. Permits use of the full 
range of CP/M' software on Apple II. Includes 
SuperCALC. 

(List: $749) $549 

U-Z-80 PROCESSOR BOARD 

(From Europe) 

Software compatible with Softcard and 

ALS Software $149 

MICROSOFT + PREMIUM SYSTEM 

Includes Videx Videoterm, Softswitch, Microsoft 
and Softcard, Microsoft and Z-80 Card, and 
Osborn CP/M - Manual 5595 

S^f**\ JOYSTICK 

^"*" * —^t\ Ta ' es ,tie place '"" lw0 
HP^^l Apple Paddle Controllers. 

From BMP Enterprises. Heavy duty industrial con- 
struction and cable. Non-self centering. With 
polarity switches for consistent motion control. 

(List: $59) $39 

MONITORS FOR YOUR APPLE 

AMDEK300G 

(18MHZ Anti-Glare Screen) $179 

NEC 12" HIRES GREEN $179 

SUPER SPECIAL! 
SPECIAL 12" GREEN MONITOR $99 




SPECIAL AND NEW 

5 MEGABYTE HARD DISK 

For Apple II. Supplied with controller. Use with 
CP/M, Apple DOS, & Apple Pascal $1995 

5V4" DISK DRIVE 
Use with standard Apple II disk controller. .$295 

5V4" FLOPPY DISKS 

With hub rings. Box of 10. 

With other purchase $19.95 

Without purchase $23.00 

16K MEMORY EXPANSION MODULE 

The preferred 16K RAM Expansion Module from 
PROMETHEUS. Fully compatible with CP/M" and 
Apple Pascal'. With full 1-year parts and labor 
warranty. (List: $169) $75 

WORD PROCESSING SPECIAL 
WITH WORDSTAR AND SUPERCALC! 

Do professional word processing on your APPLE. 
All necessary hardware and software included. 
Complete 80 column video display, enhanced 
character set, 16K memory board, Z-Card with 
CP/M ■ software, Wordstar and word processing 
software and SuperCALC. 

(List: $1,128).... Special at $695 

from Prometheus! ExpandaRAM 

The only 128K RAM card that lets you start with 
16K, 32K, or 64K of memory now and expand to 
the full 128K later. Fully compatible with Apple 
Pascal, CP/M", and Visacalc. No Apple modifi- 
cation required. Memory management system in- 
cluded with all ExpandaRAMs. Disk emulators 
included with 64K and 128K versions. 

MEM-32 Two rows of 16K RAMS 

make a 32K RAM Card $209 

MEM-64 One row of 64K RAM. 

With DOS 3.3 disk emulator $299 

MEM-128 Two rows of 64K RAMS installed 

makea128KCard. 

With DOS 3.3 disk emulator $399 

MEM-RKT 64K RAM Add-On-Kits- 

64K Dynamic RAMS. Each $125 

VISICALC Expansion Program 

for MEM-128 $75 

MEM-PSL Pascal disk emulator for 

MEM-128 $45 

MODEMS FOR YOUR APPLE II 

HAYES Smartmodem $229 

MICROMODEMII $279 





VERSAcard FROM PROMETHEUS 

Four cards on one! With true simultaneous opera- 
tion. Includes: (1) Serial Input/Output Interface, 
(2) Parallel Output Interface, (3) Precision Clock/ 
Calendar, and (4) BSR Control. All on one card. 
Fully compatible with CP/M" and Apple Pascal". 

(List: $249) $169 




80 COLUMN 

VIDEO DISPLAYS 

FOR APPLE II 

SMARTERM 

(Not to be confused with SUPRTERM) 

Software switching from 80 to 40 and 40 to 80 
characters. 9 new characters not found on the 
Apple keyboard. Fully compatible with CP/M" and 
Apple PASCAL". With lowest power consumption 
or only 2.5 watts. 

(List: $345) $225 

SMARTERM EXPANDED CHARACTER SET 

7" x 11" matrix with true decenders. Add to 
above $40 

„ .„ , Combination SMARTERM and 
Best Buy! EXPANDED CHARACTER SET 

Special at $260 

VIDEX, VIDEOTERM $249 

VIDEX ENHANCER II $119 

<JMt CENTRONICS COMPATIBLE 
^PffT PARALLEL INTERFACE 

From PROMETHEUS. For use with Epson, NEC, 
C-ITOH, and other printers. Fully compatible with 
CP/M s and Apple Pascal*. 

PRT-1 , Only $69 

GRAPHITTI CARD 

Prints HIRES page 1 or 2 from onboard firmware. 
Features: True 1:1 aspect ratio, prints emphasized 
mode, reverse mode, rotates 90 degrees . . . plus 
more. Compare all this with the Grappler. We think 
you'll agree that this is the best graphics card on 
the market. Specify for use with EPSON, NEC- 
8023, C-ITOH Prowriter, orOkidata. 

(List: $125) $89 

SOFTWARE 

WORDSTAR Special at $195 

SPELLSTAR $125 

SUPERCALC $175 

D BASE II $525 

VISICALC $149 

DB MASTER $189 

All equipment shipped factor/ fresh. Manufacturers warranties 
included. Please add $3 00 per product for shipping and handling 
California: add 6% tax. BART Counties 6V 2 % 

All items are normally in stock 

Phone for Quick 
Shipment! 

[415)490-3420 

. . . And we'll be here to help after you 

r=« receive your order. Feel free to call the SGC 

s * Technical Staff for assistance. 

The mail order specialists 

342 Quartz Circle, Livermore, CA 94550 
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68000 
Binary Arithmetic Operations 



by Joe Hootman 



A short discussion of the 
various instructions for binary 
arithmetic including addressing 
and sign information. 



The most extensive list of instructions, 
and some of the most frequently used, 
are the Binary Arithmetic Operations 
(table 1). Most of the binary operations 
are straightforward however, there are 
several instructions unique to the 
68000. 

The binary operations usually do 
not apply to operations on the address 
registers. However, in the binary arith- 
metic instruction implementation of 
the 68000, there are several instruc- 
tions such as ADDA, CMPA, and 
SUBA that are designed for operation 
on the address register. The operations 
on the address register allow special ad- 
dressing operations to be carried out 
and, more importantly, allow the com- 
parison of the magnitude of the address 
register without using the CHK in- 
struction. Clearly the address registers 
can be used as data registers or index 
registers. Three instructions deal with 
sign extension: ADDX, EXT, and 
NEGX. All of the sign extension in- 
structions sense the sign bit of the 
operation and the sign is extended 
through the length of the word. 

When arithmetic instructions are 
considered, the implementation of the 
signed multiply and divide and the un- 
signed multiply and divide must be 
considered a most worthwhile and 
powerful addition to the instruction 
set. The signed and unsigned multiply 
and divide instructions are all 16-bit in- 
structions. The data to be operated on 
is a word in length; the result of the 
operation is 32 bits long (long word). 
The interpretation of the 32 bits 
depends on the particular instruction. 
For example, if DO contains $8055, Dl 
contains $0002, and MULS Dl, DO is 
executed, the result ($FFFF00AA) will 



be left in data register DO. Since the 
most significant bit of the word is set, 
this indicates that the result is negative 
and the N bit is set in the CCR. If DO 
contains $8055, Dl contains $0002, 
and MULU Dl, DO is executed, then 
the result ($000100AA) will be in DO. 
The signed and unsigned divide 
have characteristics similar to the 
multiply instructions. If division by 
zero is attempted, a trap will occur and 
overflow is indicated by the state of the 
V bit in the CCR. If Z is set then the 



quotient is zero. The N bit follows the 
most significant bit of the result. In 
both the signed and unsigned divide the 
quotient is the lower 16 bits of the 
destination register and the upper 16 
bits is the remainder. The sign is 
reflected by the most significant bit of 
the result. 

The TST instruction subtracts the 
designated data from zero and the ap- 
propriate bits set in the CCR. This in- 
struction testing of byte, word, and 
long word data is reflected in the CCR. 



Table 1: Binary Arithmetic Operations 

*The addressing modes will be covered in future issues. 

Mnemonic Data Size/CCR Function Comments 



ADD 



8, 16, 32 
CCR 

XNZVC 



Add Binaiv 



This operation adds the binary data designated 
by the source to the data designated by the 
destination and leaves the result in the 
destination. If the effective address is a source 
then all addressing modes can be used. 
Op word Format 
15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



110 1 



Register Op Mode I Effective Address 
Mode I Register 



Register — Any of the eight data registers. 

Op Mode 

Byte Word Long Word Operation 

000 001 010 Dn + EA-+ Dn 

10(1 101 110 EA + Dn-» EA 

The source can have all the address modes except 
13, 14.* 

The destination can have all the address modes 
except 1, 2, 10, 11, 12, 13, 14.' 



ADDA 



16, 32 

CCR 

XNZVC 



Add Address This instruction adds the source data to the 
designated address register and leaves the 
result in the address register. 



15 14 1.3 12 11 10 9 8 



6 5 4 3 2 10 



110 1 



K.cgi>iL'r 



Op Model Effective Address 
Mode Register 



The register field can be any of the 8 address 
registers. This is always the destination. 

Op Mode 

011 - Word operation the sign will be extended 
to all 32 bits of the address register. 

1 1 1 - Long operation 

All addressing modes are allowed except 13, 14.* 

(continued) 
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Mnemonic Data Slze/CCR Function 



Comments 



ADDI 



8, 16, 32 
CCR 
XNZ V C 



Add 
Immediate 



This instruction adds immediate data to the 
destination data and leaves the result in the 
destination. 



15 14 13 12 11 10 9 8 


7 6 


5 4 3 2 10 


110 


Size 


Effective Address 
Mode Register 


Word data (16 bits) Byte data (8 bits| 


Long word (32 bits, including previous word| 



Size field: 00 - Byte 
01 - Word 
10 - Long word 

All addressing modes except 10, 11, 12, 13, 14 
can be used as a destination.* 



ADDQ 



8, 16, 32 


Add 


CCR 


Quick 


XNZ V C 





This instruction allows the binary addition of 
any data from 1 to 8. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



1 1 



Data 



Size 



Effective Address 
Mode Register 



The data field can contain any integer from 1 to 7. 
Size field: 00 - Byte 

01 - Word 

10 - Long word 

All addressing modes except 10, 11, 12, 13, and 
14 can be used as a destination. * 



ADDX 



8, 16, 32 


Add 


CCR 


Extended 


XNZ VC 





This instruction adds the source to the 
destination and leaves the result in the 
destination. The sign bit of the result is 
extended to fill the word. 



15 14 13 12 11 10 9 


8 


7 6 


5 4 


3 


2 10 


110 1 


Register 

R# 


1 


Size 





R/N 


Register 

R# 


Destination 
Register 


Source 
Register 



Register field R# designates any one of eight 
registers. 

If R/M = then a data register is specified. 
If R/M = 1 then an address register is specified. 

Size field: 00 - Byte operation 
01 - Word operation 
10 - Long word operation 



CLR 



8, 16, 32 


Clear an 


CCR 


Operand 


XNZ VC 




-0100 





This instruction clears the effective address. 



15 14 13 12 11 10 9 8 


76543210 


01000010 


Size Effective Address 
Mode 1 Register 



Size field: 00 - Byte operation 
01 - Word operation 
10 - Long word operation 

The following address modes cannot be used as 
destinations: 2, 10, 11, 12, 13, 14.* 



MICRObits 



Deadline for MICRObits: 20th of sec- 
ond month before publication; i.e., 
November 20th for January issue. Send 
typewritten copy (40-word limit) with 
$25.00 per insertion. (Subscribers: first 
ad at $10.00.) 

6800/6809 Software 

Includes compatible single-user, 
multi-user and network-operating 
systems, compilers, accounting and 
word processing packages. Free 
catalog. 

Software Dynamics 
2111 W. Crescent, Sta. G 
Anaheim, CA 92801 



Lessons in Algebra 

An easy and fun way to learn the 
basic elements of high school algebra. 
Apple computer diskette $29.95. 
30-day money-back guarantee if not 
satisfied. 

George Earl 

1302 So. General McMullen Dr. 

San Antonio, TX 78237 



PET Joystick Interface 

Connects directly to all PET/CBM 
computers. Allows PET to accept 
either Apple joysticks/paddles or 
Atari joysticks. No assembly required. 
Ready to plug into the user port. 
Software provided. Immediate 
delivery. Only $49.95. Michigan 
residents add 4% sales tax. 

J. Systems Corp. 

1 Edmund Place 

Ann Arbor, MI 48103 



OAI 65D V3.3 Guide 

Contains fixes and other data OSI 
didn't tell you about. Increase 
compatibility between 65DV3.X and 
VB.3. Run extended utilities under 
V3.3 and more. $14.95. New York 
residents add 7% sales tax. 

Buffalo Informational Technologies 

209 Richmond Avenue 

Buffalo, NY 14222 

VIC 20 Games — 5 for $10.00 

Tape 1: Canon Duel, Breakout, 
Runaround, Stockcar, Space Scout. 
Tape 2: Target Pistol, Space Duel, 
B29, Tank, Roadblock. Tape 3: Sub 
Hunt, Blockade, Indy500, UFO, 
Jungle Driver. Add $1.50 for p/h. All 
15 games for $25.00. 

Skylight Software 

22 Miller St. 

Belfast, ME 04915 

(Continued on page 30) 
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Table 1 (continued) 



Mnemonic Data Size/CCR Function 



Comments 



CMP 



8, 16, 32 
CCR 
XNZ VC 



Compare 



This operation subtracts from the destination 
the source; the destination is not changed. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



10 11 



Register 



Op Mode 



Effective Address 
Mode 1 Register 



Register field defines the destination data register. 

Op Mode field defines the size of the data to be 
compared. 

000 - Byte 

001 - Word 
010 - Long word 

All but the Quick Immediate and Implied 
addressing can be used for an effective address 
13, 14.* 



CMPA 



16', 32 
CCR 
XNZ VC 



Compare This instruction subtracts the effective 

Addresses address from the destination and leaves 
the destination unchanged. 



15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



10 11 



Register 



Op Mode 



Effective Address 
Mode I Register 



Register field defines the destination address register. 

Op Mode field specifies the size of the operand. 

011 - Word operator 
1 1 1 - Long word 

All effective addressing modes except the implied 
mode can be used. 



CMPI 



8, 16, 32 
CCR 
XNZ VC 



Compare 
Immediate 



This instruction subtracts the immediate 
data from the destination. The condition 
codes a set consistanr with the results of the 
operation. 



15 14 13 12 11 10 9 8 7 6 


5 4 3210 


1 10 Size 
1 


Effective Address 
Mode 1 Register 


Word data (16 bits) Byte data (8 bits) 


Long data (32 bits including previous word) 



Size field: 00 - Byte operation 
01 - Word operation 
10 - Long word operation 

The following destination effective addresses 
cannot be used: 2, 10, 11, 12, 13, 14.* 



CMPM 



8, 16, 32 
CCR 
XNZ VC 



Compare 
Memory 



This operation is used to subtract the 
source from the destination. The CCR is set in 
accord with the result. The contents of the 
destination are not changed. The addressing is 
always done using postincrement addressing. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



10 11 



Register 
Rx 



Size 



1 



Register 
Ry 



Rx must be an address register and in the 

destination. 

Ry must be an address register and is always the 

source. 

Only the Post Increment mode can be used. 
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A harvest of 
savings from 




Appl^^Tfee 
Electronics 



SOFTWARE 



m 

A full line of software for business, games 
and education up to 35% Off! 



MUSE 


kjs 


V1SKDRP 


STONEWARE 


ONCJNE 


SYNERGISTIC 


EDOWARE 


HAYDEN 


HOWARD 


AND MANY MORE 



HARDWARE 



AMDEK- HAYES • MICROSOFT 

FRANKUNCOMPOTER 

SYSTEM 
ACE 1000 -$1,795.00 



DISKS 



Maxell BoxoflO,5'4",SSDD $35.00 
Verbatim Box of 10,5!/,;",SS-DD $29.00 



MONITORS 



LE MONITORS 


Ust 


Our Pnce 


9" Green 


$189.00 


$159.00 


12" Green 


$199.00 


$169.00 


ZENITH 






12" Green 


$179.00 


$129.00 


Plus a full line of AMDEK Monitors 


PRINTERS 


PAPER TIGER 


Ust 


Our Price 


460G 


$1,094.00 


$950.00 


560G 


$1394.00 


$1,250.00 


EPSON 






MX 70 


$449.00 


$395.00 


MX80FT 


$745.00 


$595.00 


MX.100FT 


$945.00 


$795.00 



CALL FOR THIS MONTHS SPECIAL ! 

1 8O0835 2246 EXT. 211 

■:^- ;..' ;. :; v'' ,; '--^" : ::. : .or ; "v, : ' v ".'^ : 'v 

7024594114 

P^H 5130 East Chartestan Blvd. |7 = x == \| 

'\JSU Suite 5Mi ." r-rH 

^^— LasVegas,Nevada89122 ' ^^ ' 

Phone orders welcome. Mail orders may send 
charge card number (include expiration date), 
cashiers check, money order or personal check 
(allow ten business days, for personal or com- 
pany checks to clear). Add $3.00 for shipping, 
.handling and insurance. Nevada residents add 
5.75K sales tax. Please include phone number. 
: All equipment is in factory cartons with manu- 
facturers warranty. Equipment subject to price 
change and availability. Call or write for price list 
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MICRObits 

(Continued fiom page 28) 

Elephant Disks 

514" SS/SD $21/box, SS/DD (48 TPI) 
$24/box, SS/DD [96 TPI) and DS/DD 
(48 TPI) $30/box, DS/DD (96 TPI) 
$36/box. Write for prices on 8". Add 
$1 per order shipping via UPS in USA, 
NJ add 5% sales tax. 

Baker Enterprises 

15 Windsor Drive 

Atco, NJ 08004 



SYM-1 Computer Plus 6502 Books 

SYM-1 assembled and tested, never 
used (original packing). SYM 
programming manual and reference 
manual included - $130.00. PMC (EMA 
5/6B) power supply - $19.95 (cable 
connection for SYM included]. 6502 
software design [L.J. Scanlon) - $8.95 
new. Programming and interfacing 
6502 with experiments (M.L. Dejong) - 
$10.95 new. SASE: 

Frank Janda 

19 Wilson Drive 

Framingham, MA 01701 

(617) 862-3120 ext.209 



OSI Super Defender 

Play this great arcade game at home. 
All machine code includes: scanner,- 
smart bombs,- laser fire; moving 
mountains and more. Save your 
humanoids from the alien landers. Very 
smooth (half character moves) graphics. 
$14.95 for CI, 2,4 tape or 5!4" disk. 

DMP Systems 
319 Hampton Blvd. 
Rochester, NY 14612 



Commodore 64 Software 

Sprite Editor - $12, Dumb Terminal - 
$10, Disassembler - $15, Cross- 
Reference Generator for BASIC 
programs - $10. Descriptive catalogue 
50 cents. Contact by US mail or 
CompuServe 70140,223. 

NEON SYSTEMS 

5108 N. 23rd Road 

Arlington, VA 22207 

The Wrath of Khan 

Can you defeat a Superman? Com- 
mand Enterprise in a tactical battle 
against the Reliant. Cl-P controls 
Reliant's maneuvers and weapons via 
Artificial Intelligence logic routines. 
Features full status display, sensors, 
photon torpedoes, phasers, deflectors, 
and more. Cassette 8K - $14.95 ppd. 

Cygnus Software 

791 W. Oakland Park Blvd. 

Suite 432 

Ft. Lauderdale, FL 33311 
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Table 1 (continued) 

Mnemonic Data Size/CCR Function 



Comments 



DIVS 



16 Signed 

CCR Divide 

XNZVC 



- * * » 



This operation divides the destination 
by the source. The result is left in the 
destination. The source is a 1-6-bit word and 
the destination is a long word operation.The 
lower 16 bits are the quotient and the remainder 
is in the upper 16 bits,- the sign of the remainder 
is the same as dividend unless the remainder is 
zero. Division by zero causes a trap. Overflow 
may be detected and flagged but the operation is 
uneffected. 



15 14 13 12 11 10 9 8 7 6 


5 4 3 2 10 


10 


Register 11 1 


Effective Address 
Mode | Register 



The register # specifies one of the eight data 
registers and this is the destination register. The 
effective address determines the source and all 
EA modes can be used except 2, 14.* 



DIVU 



16 


-Unsigned 


CCR 


Divide 


XNZVC 




- . . .0 : 





The unsigned divide is identical to the 
signed divide except that unsigned 
arithmetic is used. 



1514 13 12 11 10. 9 


8 7 6 


5 4 3 2 1 


1 Register 

-.#■■'■ 


1 1 


Effective Address 
Mode [ Register 



The addressing modes and the definition in the 
op word are the same as the signed divide. 



EXT 



16,32 


Sign 


CCR 


Extend 


XNZVC 




- . .00 





This instruction extends the sign bit of a 
byte to aword or a word to a long word. 
The MSB is detected and extended to the proper 
length. The sign bit is considered to be the most 
significant bit ol the word 



15 14 13 12 11 10 9 


8 7 6 


5 4 3 


2 1 


10 1 


Op Mode 





Register 



Op Mode field specifies the size of the extension. 
010 - Word sign extension 
Oil . - Long word sign extension 

: Register field specifies one of eight data registers. 



MULS 



16: 

ccr ••;■■' 

XNZVC 


Signed 
Multiply 


- • • 06 :: 





This operation: multiplies two signed words 
: together. The destination must be a specified 
data register. The sign of the operation is 
reflected in the: sign bit; 

'15 14 13 12 1110 9, 8 7 6 5 4 3 2 1 



: 1 1 ■ Q ORegister 



1 1 1 



Effective Address 
Mode ['. Register 



Register field specifies one of the data registers 
and is a destination register. 

All effective addressing modes can be used 
except Direct, Quick, Immediate, and Implied 2, 

• 13/ 14> ■;..■' 



MULU 



16 


Unsigned 


CCR 


Multiply 


XNZVC 




-: • » 0:0 





This operation multiplies two 16-bit 

integers together and leaves the result in the 

destination register. The operations are similar 

to the signed multiply except that signed 

arithmetic is not used. The 32-bit result is left in 

the destination register: 

.15 14 13 121110 9 8 7 6 5 4 32 1 0. . 



1 1 0: ORegister 

■•'■■- ■ I ' - 



11 



Effective Address 
Mode I Register 



Register field specifies one of eight data registers. 

The effective address can be anything but Direct, 
Quick, Immediate, and Implied 2, 13, 14.* 
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Table 1 (continued) 
Mnemonic Data Size/CCR Function 



Comments 



NEG 



8, 16, 32 

CCR 

XNZVC 



Negate 



The destination is subtracted from zero. This: 
changes the sign of the destination. The result 
of this operation is left in the destination. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



10 10 



Size, 



Effective Address 
Mode I Register 



Size field specifies the size of the data to be 
operated on. 

00 - Byte operation 

01- Word operation 

10 - Long word operation 

Effective address modes can by anything but 2, 
10, 11, 12, 13, 14.* 



NEGX 



8, 16, 32 

CCR 

XNZVC 



Negate The destination is subtracted from zero and the 

with Extend result of the operation is left in the destination. : 

The: sign bit is extended to the end of the word. 

15 14 13 12 11 10 9 8 7 6 5 4' 3 2 1 



10 



Size 



Effective Address 
Mode | Register 



Size field specifies the size of the operation. 

00 - Byte operation 
: - 01 - Word operation 

10 - Long word operation 

The following effective address modes cannot be 
used- 2. 10, 11, 12, 13, 14 • 



SUB 



8, 16, 32 


Subtract 


CCR 


.-;■:' .; Binary! 


XNZVC 





* *. + * 



This operation subtracts the source from 
the destination and leaves the result in the 
destination. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



10 1 



Op Mode 



Effective Address 
Mode I Register 



Register field specifies any one of the eight data 
registers. 

Op Mode field defines the way that the operation 
Is tn be performed between the data register and 
the effective address. 

Long 
Byte Word Word Operation 



U00 001 010 The data register is the 
destination and the EA is 
subtracted from the 
Register 



SUBA 



16, 32 ■■•„;' 

CCR 
XNZVC 



Subtract 
Address 



100 lu I 110 The EA is the destination 
and the register is 
subtracted from the EIA. 

The only effective address |EA) modes which 
cannot be used if the EA is a source are 13, 14.* 

If the EA is a destination then the following 
effective address modes cannot be used: 1, 2, 10, 

11, 12, 13, 14.' 

TUs» instruction, subtracts the effective 
.iddrcss Irom the address register and 
leaves the icsult in the address register 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 10 



1 OOil 



Register 



OpMode 



Effective Address 
Mode | Register 



Register field specifies any one of the eight 
address registers. 

The Op Mode ipecifies the sire of the operation. 
■Oil - Word operation 
111 - Long word operation 

All effective address modes cart be used except ; 

10, 11, 12, 13, 14.* 



MICRObits „ 



continued) 



VlsiCalc To Apple Plot 

Interface translates from VisiCalc to 
Apple Plot, prevents erroneous graphs, 
fits curves to data, and supplements 
VisiCalc with rank ordering and 
alphabetizing. Send SASE for details or 
$30.00 for the copyable program. 

Bill Starbuck 

2100 E. Edgewood 

Shorewood, WI 53211 

(414) 963-9750 



VisiCalc To Apple Writer 

Veecee-Writer translated VisiCalc (/PF) 
files for Apple Writer 1. Send $15.00 for 
the copyable program. 

Bill Starbuck 

2100 E. Edgewood 

Shorewood, WI 53211 

(414] 963-9750 



AIM-65 FIG-FORTH 

Fig-Forth for your Aim-65 with 
assembler needs 16K memory. Cassette 
$20.00. With editor and assembler 
needs 32K memory $25.00. 

D. Holmes 

466 Palos Verdes Blvd. 

Redondo Beach, CA 90277 



OSI-C3B 

152K static ram, 70 MB disk, 160 1pm 
printer, dual 8" floppies, software, 1 
year old, used 2 months. $12,800.00 
US or best offer. 

Alan J. Lawson 

Toronto, Canada 

(416) 576-6508 



OSI C1 P Chomper 

Positively one of the most difficult, 
challenging, and fun dot-eating games 
available on the C1P. Progressively 
faster action, bonus characters, and 
"commercials" for high scores. 
Keyboard or joystick, 8K tape. $14.95 
includes shipping. 

Watts Ware 

153 Madrona Drive 

Anacortes, WA 98221 



Consulting Opportunities 

Learn how to become a successful 
consultant in your own field. Write for 
a free prospectus: 
The Consultant's Library 
815 15th Street, NW Dept. M. 
Washington D.C. 20005 

iSMCftO 
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Mnemonic Data Size/CCR Function 



Comments 



Announcing 

THE GUIDE 

A Complete Guide 
to the Apple Computer 




If You Own the Original 

What's Where in the 

APPLE? 

You Will Want 

THE GUIDE 

A Complete Guide 
to the Apple Computer 

only $9.95* 

The Guide provides full explanatory 
text to lead you through the most 
complete Apple memory map ever 
published! 

The Guide explains and 
demonstrates how to use the atlas 
and gazeteer published in the 
original volume! 

If you missed the first edition of 
What's Where in the Apple?, a new 

revised edition containing BOTH the 
original atlas and gazeteer AND the 
all new Guide is available in one 
256-page, Wire-O-Bound book for 
only $24.95! 

MICRO makes it easy to order: 
Send check (payable to MICRO) to: 

MICRO INK 
P.O. Box 6502 
Chelmsford, MA 01824 

Call our toll-free number: 

1-800-345-8112 

(In PA, 1-800-662-2444) 
VISA and MasterCard accepted 

"Add $2.00 shipping per book. 
MA residents add 5%. 

83-370 



SUB! 



8, 16, 32 

CCR 

X N Z V C 



Subtract 
Immediate 



This instruction subtracts the immediate 
data from the destination. The result of the 
operation is left in the destination and the 
proper bits are set in the CCR. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 



1 



10 



Size Effective Address 
Mode I Register 



Word data (16 bits) 



Byte data (8 bits) 



Long word data (32 bits using previous word) 

Size field defines the size of the operation. 

00 - Byte operation data is the lower order byte 

of the immediate word. 

01 - Word operation data is the entire 

immediate word. 
10 - Long word operation data is the next two 
immediate words. 

The following addressing modes cannot be used: 
2, 10, 11, 12, 13, 14.* 



SUBQ 



8, 16, 32 
CCR 
XNZ VC 



Subtract 
Quick 



This operation subtracts the immediate data 
from the destination. The results are left in the 
destination and the bits are set in the CCR 
consistent with the results of the operation. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



10 1 Data I 1 



Size Effective Address 
! Mode I Register 



Data field contains the immediate data to be 
subtracted: Any integer from 1 - 7 can be 
represented and in the data field represents the 
integer 8. 

Size field determines the size of the operation. 

00 - Byte operation 

01 - Word operation 

10 - Long word operation 

The following effective address modes cannot be 
used: 10, 11, 12, 13, 14. « 



SUBX 



8, 16, 32 
CCR 

XNZVC 



Subtract 

with 

Extension 



This instruction subtracts the source from the 
destination and leaves the results in the 
destination. The sign is extended. 
15 14 13 12 11 10 9 8 7 6 5 4 3 2 10 



10 1 



Register 
Rx 



Size 



Size field specifies the size of the operation 

00 - Byte operation 

01 - Word operation 
10 - Long word operation 



R/MJRegister 
Ry 



Rx 


R/M = 





R/M = 1 


destination 


data 




address 


register 


register 




register for 

predecrement 

mode 


Ry 


data 




address 


source 
register 


register 




register for 

predecrement 

mode 




data 




memory to 




register 
to data 




memory transfer 




register 


transfei 





TST 



8, 16, 32 


Test an 


CCR 


Operand 


XNZVC 




- . - 00 





This instruction compares the data defined 
by the effective address with zero. The 
condition code register is set to be consistent 
with the result of the operation. 
15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



10 10 10 



Size 



Effective Address 
Mode I Register 



00 - Byte operation 

01 - Word operation 

10 - Long word operation 

The following effective address modes cannot be 
used: 2, 10, 11, 12, 13, 14.* 



>NCAO 
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ing like it before. Nothing else like it now! 



. . brings you continuous Hi-Res action-animation in every adven- 
turous moment! And, real running, leaping, crawling. Real fighting. 
shooting, stabbing, dynamiting. Real wounding, poisoning, 
killing. Real action, excitement, mystery! AH in a real-time 
challenging adventure that's the wave of the future! 

*»\ Paul Stevenson's graphic genius, first displayed in his 

iffl v,... best selling "Swashbuckler" sword fighting game, 

* ' % ft . outdoes itself in AZTEC. You're inside an ancient 

Mi: Aztec pyramid searching for the golden idol. 

Descend deep into the heart of the temple— 

; meet cobras, scorpions, giant lizards, 

4 hostile Aztec guardians and more. Watch 

for hidden trapdoors and strange death- 
rooms. Be ready to fight, or run. crawl or 
jump to possible safety. The menace is 
real, the options and strategy are yours. 
You've never seen an adventure like 
Aztec! You'll never tire of its amazing 
action-animation and exciting challenge. 
S39.95 for the Apple 1 1* At your 
com outer store or: 









A r * V* , * is ft em •.-, ' * , ( -i.^ 



- 3> * a*"* . 

> S .-■ Xjrt Sj.- 



)?*+*&i*^ 







***ri 



The arcade-warp is open! 

YOU CAN RUN BUT CAN'T HIDE. YOU CAN KILL BUT CANT Ef 



.;# s 



Tubeway! Ir's an insidious invasion re 
created by beings from a parallel universe 
srrange, geometric universe. You're rrap 
on rhe rim as rheir fleer swarms our of rhe v 

on a voyage of 
quesr. The barrleisy 
alone— and ir's far fi 
easy because nor 
' \ srraregy doesn'r w 

... you hove ro figh 
rheir srrange, georri' 
rules! 
... \ Here's rhe fasresr, r 

// \ fascinaring of rhe- 1 
. / \ style space game's 
./ \ involving and excirin 

J/ * , \ desrined ro become 
^W \ all-star, all-rime hit. 

\ one of rhe first roraki 
\ rhe challenge of 
_r — - \ lighrfasr Tubeway! 

"""""" , \ $34.95 for .rhe Appk 
, \ Aryourcompurersrc 
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How to Make a Graphic-80 
PET from a 40 1 6 



by James Strasma 



A "Graphic 80" is an 80-column 
PET with the graphic-style 
keyboard. It can be made from a 
4016 (Commodore's cheapest 
PET) by adding some 
inexpensive, readily available 
ICs and moving some jumpers. 
The author provides step-by-step 
instructions. In addition, 
instructions are provided to add 
extra keys to an 8032 or a 
Graphic 80. 



The CBM 8032 offers an 80-column 
screen and a very business-oriented 
keyboard. Many PET owners would 
like to have the 80 columns, yet still 
maintain the easy access to graphic 
characters that the "graphic" keyboard 
offers. This does take some soldering 
and electronic assembly skill. 

This article shows how to upgrade a 
"Fat Forty" 4016 or 4032 to a graphic 
keyboard, 80-column machine. There 
are several options available, including 
only upgrading to 32K, making a 
business-keyboard 8032, and adding ex- 
tra keys to control video functions not 
previously accessible from a single key. 

Before you begin, note that these 
changes are for ASSY. NO. 8032089, 
located on the right edge of the board, 
halfway back, the FCC-approved Uni- 
versal Dynamic PET main board. Simi- 
lar changes worked with earlier boards, 
as long as the computer came with the 
large, 12-inch screen. 

Also note that procedures described 
below void any Commodore warrantee, 
guarantees non-support by them, and 
cannot be guaranteed to work on your 
particular machine. 

The traces on current PET com- 
puter boards are very tiny, and easily 
destroyed. Do not attempt this project 
unless you are skilled with a soldering 
iron. Before you start, unplug your 
machine for your safety and the 
computer's. 

Install sockets where new chips are 
added. This makes the job easier and 
makes later repairs more convenient. 



To make a 4032 from a 4016 

□ Insert 4116 dynamic RAM chips 
in the vacant positions of column UA. 
These include UA4, UA6, UA8, UA10, 
UA12, UAH, UA16, and UA18, eight 
in all. 

□ At the right front of the board, 
find the right end of jumper Y, and re- 
route that end to the next hole toward 
the rear, at the right end of a line labeled 
Z. (See figure 1.) Your PET will now 
display "31743 bytes free" when it is 
powered on. If it doesn't, check your 
connections. 

To make an 80-column machine 
from a 4032 

□ Move the right end of all ten 
jumpers at BA0 one hole to the rear. 
(See figure 2.) 

□ Just behind jumpers Y and Z, 
move the right end of the jumper labeled 
both 3 and 40 one hole to the rear, the 
right end of the line marked 4 and 80. 
(See figure 1.) 

□ Remove the short between pins 
10 and 11 of UD2 from the bottom of 
the board, and repair those pins' con- 
nections on the top side of the board. If 



you damage this chip, it can be inex- 
pensively replaced. (UD2 is the chip in 
the upper-left of figure 1.) 

□ Remove the jumpers at 6 and 7 
between UB2 and UC3. (See figure 3.) 

□ Add jumpers at 5 and at 8 in the 
same area (figure 3). The jumper at 8 
shoud be between the most widely 
separated of its four holes. 

□ Add 2114 static RAM chips at 
UC6 and UC7. 

□ Add 74LS244 octal tri-state 
driver chips at UB6 and UB7. 

□ Add a 74LS373 tri-state octal D 
flip-flop chip at UB8. 

□ Replace the 2K ROM at UD7 
with a suitable replacement, as de- 
scribed in the next section. 

To make the result a business- 
keyboard 8032 

□ Buy or program a ROM for UD7 
identical to the one supplied in that 
position on the 8032. Commodore's 
part number is 901474-03. The correct 
EPROM substitute is a single 5-volt 
supply 2716. 

□ Buy and install a business- 
keyboard in place of the graphic one 



Figure 1: Detail of front of board showing positions of Jumpers Y, Z, 3, and 4, and IC 
UD2. 
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supplied. Since the cutouts will not 
match, the lower portion of the hood 
should be replaced, or you can make 
your own mounting plate. 

To make the result a G80 

D Create a custom 2716 EPROM 
for UD7, or obtain one from a user 
group. The only change is to take the 
80-byte keyboard look-up table from 
locations $E798-$E7E7 in the Fat Forty 
ROM, and copy it into the functionally 
equivalent location in the 8032' s ROM, 
starting at $E6D1. With this change, 
the G80 will lack only the REPEAT, 
ESCAPE, and TAB keys of the 8032. 

However, as long as you have made 
the decision to modify the ROM, why 
not improve it? By changing only a few 
bytes, you may add not only the miss- 
ing keys, but also up to four others. 

Listing 1 shows my keyboard look- 
up table, which includes keys for 
TEXT/GRAPHICS, INSERT/DELETE 
LINE, ERASE TO BEGIN/END, and an 
optional value for SET TOP/BOTTOM 
OF SCREEN. The details are described 
later in the article. 



Adjusting the Screen 

There is a slight problem with the 
video adjustment that appears when 
CHR$(14| is printed. The top and bot- 
tom lines disappear! To fix this, adjust 
the potentiometer labeled HEIGHT, 
from below the video display board, 
using a small non-conductive screw- 
driver. Bear in mind that parts of this 
board carry over 10,000 volts, even 
when the computer is unplugged! 

Using the program below, adjust the 
pot so the test pattern just fills the 
screen: 

10 PRINT CHR$(14) 
20 FOR 1 = 1 TO 1999 
30 : PRINT"*"; 
40 NEXT 
50 GOTO 50 

The same fix works on any Fat Forty. 

To add missing and extra keys pull 
off the keyboard connector at the 
keyboard. Note that it has 18 separate 
connections. These correspond to the 
ten rows and eight columns of the key- 
board matrix as shown in listing 1. 

There is a small hole at each posi- 
tion in this connector. Using micro test 
clips available from Radio Shack, you 
can make temporary connections. 

For a slightly more permanent at- 
tachment, I soldered tiny loops of wire 
to the keyboard side of the connector, 
as shown in figure 4. From the right 
edge of the keyboard connector, as 
viewed in place, the ten rows of the 
keyboard matrix are the first ten wires 
from the right. The eight columns of 



Listing 1 


















.: E6D1 


3D 


2E 


10 


03 


3C 


20 


5B 


12 




E6D9 


2D 


30 


00 


3E 


19 


5D 


40 


00 




E6E1 


2B 


32 


0E 


3F 


2C 


4E 


56 


58 




E6E9 


33 


31 


0D 


3B 


4D 


42 


43 


5A 




E6F1 


2A 


35 


IB 


3A 


4B 


48 


46 


53 




E6F9 


36 


34 


15 


4C 


4A 


47 


44 


41 




E701 


2F 


38 


16 


50 


49 


59 


52 


57 




E709 


39 


37 


5E 


4F 


55 


54 


45 


51 




E711 


14 


11 


09 


29 


5C 


27 


24 


22 




E719 


ID 


13 


5F 


28 


26 


25 


23 


21 



Figure 2: Detail showing jumpers BA0 - BA10 and position of replacement EPROM at 
UD7. 




Figure 3: Detail showing jumpers 5, 6, 7, and 8. 
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Figure 4: Added loops at keyboard 
connector and clip connections. 

the matrix follow, again toward the 
left. 

The six keys I have added are all in 
column 3 of listing 1 . This corresponds 
to the thirteenth wire from the right. It 
is the one with two micro test clips in 
figure 4. Each of these wires connects 
to one pole of an added key (or push 
button, as I implemented it). 

Rows 1, 3, 5, 6, 7, and 9 contain the 
added keys. Connect each one to the 
unused pole of the appropriate added 
"key." One more key could be added 
by attaching wires to row 2 and column 
5. These correspond to positions 2 and 
15 from the right end of the connector, 
and would be mated through another 
key. 

If you prefer to implement another 
keyboard value, substitute your prefer- 
red PET ASCII value into the keyboard 
look-up table of listing 1. For instance, 
if you replace the $03 at location 
$E6D4 with $07, then hitting the STOP 
key would ring the chime rather than 
halting running programs. 

I chose to mount push buttons 
through the bezel surrounding the 
video screen, as shown in figure 5. I 
used Radio Shack's tiniest push but- 
tons because they are unobtrusive, 
easier to push than large ones, and I 
couldn't find regular keyswitches. 
Regular keyswitches could be used, or a 
surplus keypad could be wired up. 

One method for making the G80 





f P 


^H 


■ 


'o— «— ™ 





Figure 5: Micro push buttons added near 
screen. Three additional buttons were in- 
stalled on the other side. 

selectable between 40 and 80 columns 
requires three ICs to switch the neces- 
sary lines. This plan offers a simpler 
solution. It uses a 2732 EPROM, pre- 
programmed to mimic any two BASIC 
4.0 ROM sets, and switches from one 
to the other by grounding one pin. 

The disadvantage of this method is 
that the 40 columns appear smaller and 
centered on an 80-column screen, 
rather than occupying the full width, as 
on a Fat Forty. 

For information on how to obtain 
this chip, see the box on this page. 

Software Compatibility 

Nearly everything for the 8032 also 
works on the G80, especially after ad- 
ding the missing keys. This includes 
the 8096 memory expansion board, 
Silicon Office, COMAL, and VisiCalc 
8096. The exceptions are complete 
languages, including UCSD Pascal, the 
former PET BASICs supplied with the 
8096 board, and A.B. Computer's "Ex- 
panded BASIC" for the 8096. By modi- 
fying the programs, I have been able to 
get all but UCSD Pascal to work with 
the G80. 



You may contact the author at 1280 
Richland Ave., Lincoln, IL 62656. 

4MCRO 



Obtaining Alternate ROMs 

To order alternate ROMs for Commodore 8032 and G80 computers, write: 

Jim Russo 

Ann Arbor Terminals, Inc. 

6175 Jackson Road 

Ann Arbor, MI 48103 
You may request any two of the following variations of BASIC 4: 
Fat Forty (Current model, but centered on an 80-column screen.) 
Skinny Forty (Also centered; works with far more games. No repeat function.) 
Eighty (Same as the 8032.) 

Be sure to specify whether the ROM is for a G80 or an 8032. I think the 
charge is still $10 per ROM, barely above the cost of the 2732 itself. 



ANDROID 
ATTACK 

i-or Jj^ ATARf 






Fight your way doan through the 
Top-Secret underground laboratory 
to save the runaway nuclear 
reactor, then try to save yourself 
before the Androids get you! 

16K cassette, 32K disk (SPECIFY!) 

Ask for ANDROID ATTACK at your 
local dealer or send $18.95 + $2.M 

shipping, Nrite for our illustrated 
list of gaies for your ATARI. 

PRETZELLAND 

SOFTWARE 
2005 D WHITTAKER RD 



YPSILANTI 



MI 4S197 
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CoCo Bits 



By John Steiner 



Ed. note: This is the first of our Color 
Computer columns. John will be 
augmenting out coverage of 6809 com- 
puters and helping to recruit authors. 



This column will have two major goals: 
to provide news about the TRS-80 Col- 
or Computer, and to provide a clearing- 
house for CoCo information. In addi- 
tion, I hope to pass along any informa- 
tion on the 6809, the 6847 video 
display generator, and the other major 
components CoCo has. 

Originally, it seems, Tandy devel- 
oped CoCo to compete with Atari, the 
VIC 20, and other game machines of 
similar style. Witness the use of ROM 
program packs for games, etc. This em- 
phasis seems to be changing slightly. 
Just recently, Tandy has taken the 4K 
machine off the market and replaced it 
with a 16K version, at the same price. 
With the addition of the 32K upgrade 
[which uses 64K chips), CoCo has 
entered a new world. The newer, more 
powerful machine has been easily con- 
verted to 64K and given the capacity to 
run FLEX. OS-9 will probably be 
available by the time you read this. 
These two powerful operating systems 
allow a vast range of 6809 software to 
be executed from CoCo. As I learn 
more details of these CoCo expansions, 
I will pass them along. 

Since this is the games issue, I have 
some game-oriented information this 
month. If you have a Color Computer 
disk system, you have no doubt been 
frustrated by the fact that the CoCo 
DOS scratchpad is located at $600, just 
where many machine-language tape 
programs like to reside. I am grateful 
that Tandy has started releasing some 
software on tape since disk users have 
trouble getting the disk drive and a 
ROM pack in the ROMport at the same 
time. It is a shame, though, to have to 
spend several minutes loading a 14K 
adventure game from tape, when that 
expensive disk system just sits there 
taking up space. 

I purchased "BEDLAM," an adven- 
ture game on tape, and decided I would 
have to transfer it to disk. Being a 



relative beginner to machine-language 
programming and only having experi- 
ence with the 6800, 1 have been waiting 
for Tandy's assembler (though others 
became available, I had a deposit on 
Tandy's]. When it finally arrived, I 
plugged in the EDTASM + ROM pack 
(doggone it, there went the disk again), 
and loaded BEDLAM using an offset of 
16384. Using the monitor, I found the 
start and end addresses, and tacked a 
little routine at the end. This routine, 
shown below, moves the program, one 
byte at a time (I forgot about the D 
register] down to $600. It then transfers 
execution to $600, the start address of 
BEDLAM. 

You may enter and assemble the 
listing yourself, or enter the object code 
from the assembler listing using a 
monitor. Once the routine is in place, 
beginning at $7F02, use CLOADM 
"BEDLAM", 16384 to load in 
BEDLAM. Transfer the whole thing to 
disk with the command SAVEM 
"BEDLAM", &H4600, &H7F15, 
&H7F02. Notice the execute address is 
the start address of the memory move 
routine. To run the program, you can 
just use LOADM "BEDLAM" : EXEC, 
or you can write a BASIC load routine, 
and let BASIC do the work for you with 
a simple RUN "BEDLAM". 

Once the program has been loaded 
into the region at $600, disk BASIC is 
essentially gone. The quick and dirty 
method to restore DOS is to shut the 
computer off, then turn it on again. A 
better way is to let RESET do it for you. 



CoCo BASIC has two options in its 
reset routine: a cold start and a warm 
start. When RESET is pressed, memory 
location 113 is checked for $55. If 
found, a warm start is done, any pro- 
gram in memory is saved; string 
memory, number of graphics pages 
reserved, and other parameters are 
kept. If, on the other hand, anything 
but $55 appears, BASIC assumes a cold 
start and reconfigures the system to 
power up status. This little trick will 
recover our disk when we are through 
with BEDLAM. Before loading the pro- 
gram, from BASIC enter POKE 113,0. 
Alternatively, you could add a routine 
at the beginning of the machine-lan- 
guage loader that will store a zero into 
location 113 before executing BED- 
LAM. When you are ready to quit 
BEDLAM, just press RESET. DOS will 
be reconnected. You will not be miss- 
ing any fancy end routine by leaving 
BEDLAM in this manner. 

A quirk of this and the other Radio 
Shack adventure games I've seen is 
their STOP or QUIT command. I would 
have expected control to return to 
BASIC. What happens is that the key- 
board will lock up, causing you to turn 
off the computer or press RESET to 
regain control. As long as you have to 
press RESET anyway, you might as 
well reconnect the disk. Though not 
particularly fast or fancy, you can use 
the routine on any 32K machine to 
transfer programs. Just substitute the 
correct start, end, and execute ad- 
dresses where required. 







♦ 


ORG 


$7F02 








•PROGRAM TO MOVE BEDLAM 


* 






♦JOHN STEINER 8/1/82* 




7F02 8E 


4600 


START 


LDX 


#$4600 


Load current start address 


7F05 108E 


0600 




LDY 


#$600 


Load new start address 


7F09 A6 


80 


MOVE 


LDA 


,X + 


Load byte from current address 


7F0B A7 


A0 




STA 


,Y + 


Store byte to new address 


7F0D 8C 


7F01 




CMPX 


#$7F01 


Done yet? 


7F10 26 


F7 




BNE 


MOVE 


If not go do it again 


7F12BD 


0600 




JSR 

END 


$600 
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(continued) 



One more programming hint for 
this month. Disk users are told by the 
disk system manual that "COPY" is 
available for only multi-drive users. 
This is incorrect. If you have a single 
disk drive, you can enter COPY 
"filename/ext". You will be prompted 
as to when to switch disks. In addition, 
unlike BACKUP and DSKINI, COPY is 
non-destructive of the program in 
memory. If you have a long program in 
memory and a large file to copy, how- 
ever, you may have to switch disks a 
couple of times. COPY can be used to 
transfer any file type, and easily 
transfers machine-language or data 
files. I will have more details on COPY 
next month, including a small routine 
that assists in selective disk backups. 

I am an electronics instructor by 
profession, and would like to make a 
couple of comments on CoCo in school. 
Tandy is developing courseware that 
runs on the Color Computer. CoCo 
will be making appearances in class- 
rooms around the country if Tandy has 
anything to say about it. By the time 
you read this, teachers will have access 
to programs such as Chemistry Simula- 
tions. Radio Shack's Talk/Tutor 



development system is the medium for 
several recently released educational 
packages, including Vocabulary Tutor 
I, and Inventions That Changed Our 
Lives. Talk/Tutor programs make good 
use of the high-resolution graphics and 
audio features of CoCo. 

In addition to these and other 
educational software, Color PILOT will 
have been released. PILOT has been 
used by many instructors who wanted 
to develop computer-assisted instruc- 
tion, yet did not want to learn the com- 
plexities of BASIC. Color LOGO, 
another popular language with educa- 
tors, should also be available. Both pro- 
grams will have disk versions; LOGO 
will also be on ROM pack. 

I am looking forward to comments 
from readers. I plan on including pro- 
gramming hints, and CoCo- and 
6809-related news. In addition, CoCo 
disk users are probably a distinct 
minority and I will have information 
on Color BASIC and Extended BASIC, 
as well as disk BASIC. I can be reached 
at 508 Fourth Ave. NW, Riverside, ND 
58078, or contact me through MICRO. 

JMCftO 



AT LAST... nni 

For investors 

and financial managers 

Stock portfolio analysis 

S150.00 

•in your office - insfanf valuations 

•compound growth measurement 

•pertinent company operating statistics 

Stock financial 

statement analysis 

S 250. 00 

•input your interpretation 

of financial data 

•analyze up to 10 years of data 

•see mean, trend and stability 

On-line data retrieval 

S50.00 

Accounting package 

S 150.00 

DBM system 

S 200.00 

for 8" floppy/hard disc 

under OS65U 

4$$ Full Screen Editor 

^ for Polled Keyboard 

S75.00 

•for OS65D & OS65U 

• machine language based 

•type or cursor mode 

write for details 

Genesis Information 
Systems, Inc. 

P.O. Box 3001 • Duluth. MN • 55803 
Phone 218/724-3944 



l 



Perry PerIp^eraIs Repajrs KIMs!! 

(SYMs ANd AIMs Too) 

• We will Diagnose, Repair, and Completely Test your Single Board Computer 

• We Socket all replaced Integrated Circuits 

• You receive a 30-day Parts and Labor Warranty 

• Your repaired S.B.C. returned via U.P.S. — C.O.D., Cash 

Don't delay! Send us your S.B.C. for repair today 
Ship To: (Preferably via U.P.S.) 

Perry PerjpIieraLs 

6 Brookhaven Drive 
Rocky Point, NY 11778 

KIM-1 Replacement MocJuIes 

• Exact replacement for MOS/Commodore KIM-1 S.B.C. 

• Original KIM-1 firmware — 1K and 4K RAM versions 

Replacement KIM-1 KEyboARds 

• Identical to those on early KIMS — SST switch in top right corner 

• Easily installed in later model KIMs 

Perry Peripherals is an authorized HDE factory service center. 

Perry Peripherals carries a full line of the acclaimed HDE expansion components for you KIM, SYM, and AIM, 
including RAM boards, Disk Systems, and Software like HDE Disk BASIC V1. 1. Yes, we also have diskettes. For 
more information write to: P.O Box 924, Miller Place, NY 11764, or Phone (516) 744-6462. 
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BOX 120 

ALLAMUCHY, N.J. 07820 

201-362-6574 



HUDSON DIGITAL ELECTRONICS INC 



THE TASK* MASTERS 



HDE supports the *TIM, AIM, SYM and KIM (TASK) with a growing line of computer programs and 
peripheral components. All HDE component boards are state-of-the-art 4W x 6V2", with on board 
regulation of all required voltages, fully compatible with the KIM-4 bus. 



OMNIDISK 65/8 and 65/5 

Single and dual drive 8" and 5 1 /4" disk systems. 
Complete, ready to plug in, bootstrap and run. 
Include HDE's proprietary operating system, 
FODS (File Oriented Disk System). 



HDE DISK BASIC 

A full range disk BASIC for KIM based systems. 
Includes PRINT USING, IF . . . THEN . . . ELSE. 
Sequential and random file access and much 
more. $175.00 



DM816-M8A 

An 8K static RAM board tested for a minimum of 
100 hours and warranted for a full 6 months. 



HDE ADVANCED INTERACTIVE 
DISASSEMBLER (AID) 

Two pass disassembler assigns labels and con- 
structs source files for any object program. 
Saves multiple files to disk. TIM, AIM, SYM, KIM 
versions. $95.00 



DM816-UB1 

A prototyping card with on-board 5V regulator 
and address selection. You add the application. 



HDE ASSEMBLER 

Advanced, two pass assembler with standard 
mnemonics. KIM, TIM, SYM and KIM cassette 
versions. $75.00 ($80.00 cassette) 



DM81 6-P8 

A 4/8K EPROM card for 2708 or 271 6 circuits. 
On board regulation of all required voltages. 
Supplied without EPROMS. 



DM816-CC15 

A 15 position motherboard mounted in a 19" 
RETMA standard card cage, with power supply. 
KIM, AIM and SYM versions. 



DISK PROGRAM LIBRARY 

Offers exchange of user contributed routines 
and programs for HDE Disk Systems. Contact 
Progressive Computer Software, Inc. for details. 

AVAILABLE DIRECT OR 



HDE TEXT OUTPUT PROCESSING SYSTEM 
(TOPS) 

A comprehensive text processor with over 30 
commands to format and output letters, docu- 
ments, manuscripts. KIM, TIM and KIM cassette 
versions. $135.00 ($142.50 cassette) 

HDE DYNAMIC DEBUGGING TOOL (DDT) 

Built in assembler/disassembler with program 
controlled single step and dynamic breakpoint 
entry/deletion. TIM, AIM, SYM, KIM AND KIM 
cassette versions. $65.00 ($68.50 cassette) 

HDE COMPREHENSIVE MEMORY TEST 
(CMT) 

Eight separate diagnostic routines for both 
static and dynamic memory. TIM, AIM, SYM, 
KIM and KIM cassette versions. $65.00 ($68.50 
cassette) 
FROM THESE FINE DEALERS: 



Progressive Computer Software 
405 Corbin Road 
York, PA 1 7403 
(717)845-4954 



Johnson computers 

Box 523 

Medina, Ohio 44256 

(216) 725-4560 



Lux Associates 
20 Sunland Drive 
Chico, CA 95926 

(916)343-5033 



Falk-Baker Associates 

382 Franklin Avenue 

Nutley, NJ07110 

(201)661-2430 

Laboratory Microcomputer Consultants 

P.O. Box 84 

East Amherst, NY 14051 

(716)689-7344 



Perry Peripherals 

P.O. Box 924 

Miller Place, NY 11764 

(516)744-6462 



GAMES FEATURE 



Castle Adventure 
for PET and Apple 



by David Malm berg 



Castle Adventure is a role- 
playing game that involves 
traveling throughout a 
dangerous castle in search of 
treasure. The goal is to rescue 
the princess, while avoiding the 
many dangers about you. 



Castle Adventure 

requires: 

PET/CBM with 32K 
or Apple II with 48K 
or other Microsoft BASIC 
computer 



In CASTLE ADVENTURE you play the 
role of Godfrey de Goodheart, a bold, 
but impoverished knight. King Fredrick 
HI has dispatched you to rescue his only 
daughter, the beautiful Princess Fatima, 
from the dungeons of Baron von Evil's 
castle. You have also been asked to cap- 
ture the Baron's treasures of gold, 
silver, and gems, which he enmassed 
by cruelly exploiting his serfs. If you 
can rescue the princess and return with 
all of the Baron's ill-gotten treasures, 
King Fredrick has promised you Prin- 
cess Fatima's hand in marriage. 

Your quest will be filled with peril. 
The seven lone knights who were 
previously sent on this crusade all 
vanished without a trace. If you are to 
succeed where so many others have 
failed, you must use all your strength 
and cunning — and be very lucky! 

During your quest the computer 
will be your guide. You take action by 
giving the computer a series of one- or 
two- word commands, such as: GO 
SOUTH (or just "S"), OPEN DOOR, 
GET KEYS, LEAVE CHEST, SWIM. 
The computer has a vocabulary of only 
about 100 words. If it does not under- 
stand your command, try something 
else. A complete list of this vocabulary 



is purposely not included. At least half 
the fun will be establishing the com- 
puter's lexicon. Several commands will 
be particularly useful: 

• INVENTORY |or just "I") will give 
you a list of all the items you are 
carrying. 

• LOOK (or just "L") may reveal 
significant details that: may help you 
in your quest. 

• HELP (or just "H") may result in a 
valuable hint. 

• SAVE will cause the current status of 
the game to be saved on tape or disk. 

• LOAD will enable you to resume a 
previously saved game. 

• SCORE will show you the total num- 
ber of points you have earned so far. 

• QUIT will end the game and show 
you your final score. 

Remember that everything you en- 
counter in your adventure has a pur- 
pose. There are plenty of clues, but it 
will take imagination, perseverance, 
cunning, skill, and most of all luck to 
win the Princess's hand. 

Converting to Other Computers 

CASTLE ADVENTURE, as shown 
in listing 1, is written for a 32K 
PET/CBM computer. Listing 2 shows 
changes required for an Apple II. 
However, the program is written in 
"standard" Microsoft BASIC, so con- 
version to other Microsoft machines 
should be a relatively trivial task. 
There are only three areas where 
changes to the program will have to be 
made. 

First, you will have to replace the 
screen and cursor control commands of 
the PET. These are shown in the listing 
within square brackets in their 
"English equivalents" so their mean- 
ing should be fairly obvious,- i.e., CLR 
means clear the screen, 3 DOWN 
means move the cursor down three 
rows, etc. CASTLE AID VENTURE is 
written for a 40-column screen, so no 
spacing changes will be required for the 



Atari (with Microsoft BASIC] or other 
40-column systems. 

The second change is to convert the 
LOAD game (lines 24 to 36) and SAVE 
game [lines 219 to 233) routines so they 
will be compatible with your 
machine's tape and/or disk command 
formats. The variables you want to 
SAVE and LOAD are: SF, LX, DF, R, 
and the array IA(.), which has IL 
elements (including a zero-th element). 

The last thing to change is the 
reference to the PET ROMs in line 390. 

Acknowledgement 

Many of the ideas in CASTLE 
ADVENTURE, as well as other adven- 
tures that are widely available, owe a 
tremendous debt to Scott Adams. In the 
specific case of CASTLE, it uses a data- 
base structure and table-driven logic 
similar to those first described by 
Adams in several articles. These 
articles are a must for the true 
adventurephile: 

l."An Adventure in Small Computer 
Game Simulation," Creative Com- 
puting, (August 1979). Describes the 
data-base structure. 
2."Adventureland," Softside, (July 
1980). Describes the table-driven 
logic. 
3. "Pirate's Adventure," BYTE, 
(December 1980). Also describes the 
table-driven logic. 

Castle Adventure listing begins on 
page 42. The changes for Apple II 
(listing 2) are on page 46. 



David Malmberg is the author or co-author 
of several personal computer packages; the 
most recent is VIC Turtle Graphics 
published by Human Engineered Software. 
You may contact him at 43064 Via 
Moraga, Fremont, CA 94539. 
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CHRISTMAS SEASON 
SPECIALS! 

Let ARK COMPUTING Make This Your 
Best Christmas Ever! 



Super Fan II by R.H. Electronics 59.95/79.95 

Applicard, a high performance Z-80 card 

with 64K Ram, complete with CP/M 

4 mhz 324.95/445.00 

6 mhz 395.00/595.00 

Microsoft Z-80 card with CP/M and 

Microsoft Basic 

2 mhz 269.95/395.00 

Microtek Parallel Printer Interface complete 

with centronic compatible connector 

64.95/79.95 

Lazer Lower Case +Plus with Character 

Set +Plus 49.95/84.90 

Lower Case +Plus alone 39.95/59.95 

Lazer Graphics 4-Plus 99.95/159.95 

Graphics 4Plus and 

Lower Case +Plus 1 34.95/21 9.90 

Computer Stop 16K Ram Board 69.95/149.95 

Computer Stop Omnivision 80 Column board 
129.95/295.00 

Videx Video-term with Softswitch, inverse 

character set and 80 column Visicalc preboot 

295.00/450.00 

Wizard BPO 1 6K buffered printer interface 
(expandable to 32 K) 1 34.95/1 79.95 

Wizard 80, 80 column board 1 95.00/295.00 

Lazer Pascal 29.95/39.95 

Anixl.O 34.95/49.95 

Lazer Forth 44.95/59.95 

D Tack 68000 board for the Apple II 
with 4K Ram 895.00 

Lazer Model/32 (1 6032 board for the Apple II) 
CALL! 



Lisa 

Lisa Educational Pak 

Alien Ambush 

Bandits 

Cannonball Blitz 

County Fair 

Cranston Manor 

Cyclod 

David's Midnight Magic 

Dosource 3.3 

Dueling Digits 

Falcons 

Firebird 

Foosball 

Horizon V 

Genetic Drift 

Kabul Spy 

Jelly Fish 

Lemmings 

Labyrinth 

Mouskattack 

Outpost 

Red Alert 

Pig Pen 

Russki Duck 

Minator 

Track Attack 

Thief 

Space Quarks 

Snack Attack 

Swash Buckler 

Gin Rummy 

The Dictionary 

General Manager 

4 Ft. Disk Cable 

Visicalc 

Using 6502 Assembly 

Language Book 

Kids and The Apple 

Computer Book 

Apple Panic 

Kraft Joystick 



59.95/79.95 
79.95/119.95 
19.95/29.95 
19.95/29.95 
24.95/34.95 
19.95/29.95 
24.95/34.95 
19.95/29.95 
24.95/34.95 
24.95/39.95 
19.95/29.95 
21 .95/29.95 
21 .95/29.95 
19.95/29.95 
25.95/34.95 
19.95/29.95 
24.95/34.95 
19.95/29.95 
19.95/29.95 
19.95/29.95 
24.95/34.95 
19.95/29.95 
19.95/29.95 
24.95/34.95 
25.95/34.95 
24.95/34.95 
1 9.95/29.95 
17.95/29.95 
19.95/29.95 
19.95/29.95 
24.95/34.95 
24.95/34.95 
69.95/99.95 
99.95/149.95 
19.95/29.95 
1 79.95/250.00 

14.95/19.95 

15.95/19.95 
19.95/29.95 
49.95/69.95 




Your Salvation 

In The Sea Of 

Inflation. 



714735-2250 

P.O. Box 2025 
Corona, CA91720 
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ROCKWELL Microcomputers from Excert, Inc. 



THE AIM 65/40 
Single Board or Smorgasbord 



- '3a 




A full size terminal style keyboard w/8 special 

function keys 

A smart, 40 character display with its own 

microprocessor 

A 40 column printer w/text and graphic output 

Up to 64K of on-board RAM and ROM 
On-board interfaces include RS232, dual audio 
cassette and 2 user I/O R6522 devices 

Firmware includes interactive monitor and text 
editor w/options of Assembler, BASIC, FORTH 
and PL/65 



THE AIM 65 
Take-Out Order 



/%*& 




A full size terminal style keyboard w/3 special 

function keys 

A 20 character display 

A 20 column printer w/text and graphic output 
capability 

Up to 4K RAM and 20K ROM on-board 
On-board interfaces include 20MA TTY, dual 
audio cassette and 1 user I/O R6522 device 

Firmware includes interactive monitor and text 
editor w/options of Assembler, BASIC, FORTH, 
PASCAL, & PL/65 



And if the above isn't enough, 
Try the RM65 — a product line filled with embellishments including: 



32K DRAM Board 
CRT Controller 
Floppy Disk Controller 
PROM Programmer 



ACIA Board 
IEEE-488Board 
CPU/SBC Board 
4-16 Slot Card Cages 



Prototype cards 
Adaptor Buffer Modules 
General Purpose I/O Board 
PROM/ROM Board 



NEW LOWER PRICES AND A CASH DISCOUNT* TO BOOT! 



A65/40-16(16KRAM) $1225 

A65/40-32 (32K RAM) $1 295 

A65/40-A (Assembler) $ 85 

A65/40-B (BASIC) $ 65 



Mail Order to: 



A65-1 (1 K RAM) $420 

A65-4 (4K RAM) $445 

A65-4B (4K RAM w/BASIC) $495 

A65-PS (PASCAL) $100 

A65-F (FORTH) $ 65 

A65-A (Assembler) $ 35 



Educational Computer Division 
EXCERT INCORPORATED 



• SALES 

• SERVICE 

• INSTALLATION 

• CONSULTING 



P.O Box 8600 

White Bear Lake, MN 55110 

(612)426-4114 



Higher quantities quoted upon request, COD's accepted, 
shipping will be added. * Deduct 5% cash discount on 
prepaid orders. Minnesota residents add 5% sales tax. 
Prices subject to change without notice. 
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GAMES FEATURE 



SYM 23 Matches 



by MattGanis 



Two players alternate, removing 
matches from a pile of 23; the 
player taking the last match 
loses. On each turn a player may 
take 1, 2, or 3 matches. 

23 Matches 

requires: 

1KSYM 

In this version of the game the human 
challenges the computer. Key in G 
0200 to begin the game. The LEDs will 
go blank and the SYM will wait for you 
to press any key on the keypad. Once 
this is done the computer informs the 
player that it is his turn. At this point 
the player enters either a 1, 2, or 3 (tak- 
ing away 1, 2, or 3 matches). The SYM 
will inform the player of the number of 
matches it is taking by scrolling the 
message 'I SELECT....' 

Modifications to the program are 
very simple: 

1 . To change the speed of the messages 
that scroll on the display, decrement 
the value at location $02FA. 

2. To make the computer move first, 
change the at location $0204 to 1 . 

3. To alter the number of matches used, 
change the $17 (hex $17, decimal 23) 
to the number of matches desired. 

The only part of the program that 
might be used in another program is the 
'display-a-message' routine at location 
$02EE. This routine will scroll a 
message across the SYM displays start- 
ing at the right-most display and ending 
at any desired display. Just set the zero 
page pointer (PTR) to the location of 
the message (lo, hi), and load the Y 
register with the number of displays to 
be used minus one. Then do a JSR 
MESSAGE. 



Mr. Ganis studies computer science at 
PACE University (Pleasantville/ 
Briarcliff). He may be contacted at 
Sheridan Road R.D. #3, Lebanon, NJ 
08833. 



23 Matches 



100 

110 
121 

121 
130 
130 
149 
140 
140 
140 
158 

160 

165 



0200 



0200 

0201? 
0200 

0200 

0200 



0200 
0200 

0263 
0205 
0207 
0209 
020E 
020D 
020F 
0211 
0213 
0215 
02 IS 



THIS IS* R GAME OF 23 MRTCHES. 
EACH PERSON (THE COMPUTER AND 
THE PLAYER TAKE TURNS TAKING 
AWAY MATCHES FROM THE PILE. 

ON EACH TURN VOU MHV TAKE 0HLV 
1,2 OR 3 MATCHES. THE PLAYER 
TAKING THE LAST MATCH LOSES ! ! 

BASIC VERSION FROM - 

101 BASIC COMPUTER GAMES 
EDITED BV DAVID H. AHL 



TO START GAME KEY -' G 0209 



***ZER0 PAGE LOCATIONS USED 



80: 


0200 


MOVE 


= 


$00 


.; WHOSE MOVE IT IS 


81: 


0200 


MATCHES 


= 


$01 


..'NUMBER OF MATCHES 


32 : 


0200 


DISPLAY 


= 


$02 


iLAST DISPLAY USED 


b'3 : 


0200 


RND 


= 


$04 


.: RANDOM NUMBER 


34: 


0200 


PTR 


= 


$05 


.: POINTER FOR MESSAGES 


85 •• 


0200 


COUNT 1 


= 


$07 


> DELAY COUNTER 1 


86 : 


0200 


C0UNT2 


= 


$08 


.: DELAY COUNTER 2 


37: 


0200 


TEMP 


= 


$09 


;TEMP. STORAGE 


38: 


0200 


REG 


= 


$0A 


;1ST REG. COMPUTER MOVE 


39 : 


0200 


SVMM0VE 


= 


SOB 


.; COMPUTER'S MOVE 


90: 


0200 


REG2 


= 


$0C 


;2ND REG. COMPUTER MOVE 


91-' 


0200 


TEMP2 


= 


$0D 


,TEMP. STORAGE 2 






;***M0NIT0R 


LOCATIONS 


USED*** 



GETKEV 



LED 

SCAND 

ACCESS 

SEGC0DES 

KEYSTAT 



20 86 3B MAIN 

A9 00 

85 00 

A9 17 

35 01 

A3 42 

85 02 



A6 
03 
04 



RANDOM 



20 6A 
90 F9 



JSR 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
INC 
JSR 
BCC 



$8SAF 



$A640 
$8906 
$8E86 
$8C29 
$396A 



$0200 

ACCESS 

#0 

MOVE 

#23 

MATCHES 

#$42 

DISPLAY 

#$A6 

DISPLAV+1 

RND 

KEYSTAT 

RANDOM 



,;GET A KEY FROM KEYPAD 



.LOCATION OF 1ST DISPLAY 
;SCAN THE DISPLAY 

; ENABLE SYSTEM RAM 

; TABLE OF SEGMENT C0EES 

J IF fi KEY IS D0NN C=l 



.: ENABLE RAM 
; PLAYER FIRST 
; MATCHES=23 



; GENERATE RANDOM # 
..WAIT FOR KEY DOWN 
;IF NO KEY, BUMP RND 



(continued) 
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GAMES FEATURE! 



/AICRO 

New Publications 



40 Computer Games from Kilobaud 
Microcomputing, edited by Emily A. 
Gibbs and Jim Perry. Wayne Green, 
Inc. (Peterborough, NH], 1980, 148 
pages, paperback. $7.95 

40 Computer Games offers you some of 
the best game programs from recent 
issues of Kilobaud Microcomputing. 
Nine game categories offer something 
for everyone. Accompanying articles 
explain how to play the games and in- 
crease the odds to beat the computer. 
The games are written in different lan- 
guages for various computer systems. 

CONTENTS: Gambling; Racing; Space; 
Board Games; Card Games; Guessing 
Games; Puzzles; Calculators; Odds and Ends. 

Science and Engineering Sourcebook by 

Cass Lewart. Micro Text Publications 
Inc. (One Lincoln Plaza, Suite 27C, 
New York, NY 10023), 1982, 95 pages, 
6x9 inches, paperback. 
ISBN: 0-942412-02-8 $9.95 

A book of professional applications pro- 
grams for the TRS-80 Pocket Com- 
puter. The programs cover problems in 
the field of electrical engineering, 
statistics, queuing theory, reliability, 
graph generation, artificial intelli- 
gence, and related technical disci- 
plines. A table of conversions make the. 
translation of these programs applic- 
able to other BASIC computers. 

CONTENTS: Foreword; Introduction; Elec- 
trical Engineering; Data Transmission; 
Number Theory; Computer Programming; 
Computer Generated Plotting; Probability 
and Statistics; Mathematics; Operations 
Research; Miscellaneous; Appendix. 

Games for the ATARI, by S. Roberts. 
Elcomp Publishing, Inc. (53 Redrock 
Lane, Pomona, CA 91766), 1982, 115 
pages, paperback. 
ISBN: 3-911682-84-3 $7.95 

Games foi the Atari provides ideas on 
how to create your own computer 
games. This booklet deals primarily 
with BASIC examples with only one 
example in machine language. Atari 
programs show the possibilities of 
using both graphics and sound features. 

CONTENTS: Drawing Figures on the 
Screen; Movements in BASIC; Movements 
in Machine Language; Movements of 
Missiles; Overlapping Detection; Sound- 
(Continued on next page) 



23 Matches (continued) 



166 


021 1=1 1=19 06 


PRINT 


LDfl 


#0 


; PRINT MATCHES 


167 


02 1C 85 09 




STR 


TEMP 




16S 


021E fi5 01 




LDfl 


MATCHES' 




170 


0220 38 


PNT2 


SEC 




; DETERMINE TENS 


172 


0221 E9 0R 




SBC 


#*0fl 


.'BY SUCCESSIVE 


174 


0223 30 04 




BMI 


PNT3 


.•SUBTRACTIONS OF 10 


176 


0225 E6 09 




INC 


TEMP 


J BUMP TENS SPOT 


178 


0227 D0 F7 




BNE 


PNT2 


.: BRANCH ALWAYS 


180 


0229 18 


PNT3 


CLC 






182 


Q22fi £9 0l=l 




ABC 


#*0fl 


..ADD 10 BACK 


184 


022C fifl 




TAX 




;T0 GET UNITS 


186 


022D BB 29 8C 




LDfl 


SEGC0DES.X 


;get segment code 


188 


0230 3D 41 fl6 




STfl 


LED+1 


.'2ND DISPLAV 


196 


0233 fl6 09 




LDX 


TEMP 


,:GET TENS 


192 


0235 BD 29 8C 




LDfl 


SEGC0DES. X 


; GET THE CODE 


194 


0238 SB 46 R6 




STfl 


LED 


;1ST DISPRLV 


196 


023B R5 01 




LDfl 


MATCHES 


;TEST FOR ZERO 


198 


023D D0 63 




BNE 


OVER 


; MATCHES, BRANCH IF tv 


200 


023F 4C D6 02 




JMP 


LOST 


.: SOMEONE LOST ! ! 


202 


0242 R9 01 


OVER 


LDfl 


#1 


; DETERMINE WHOSE 


204- 


0244 38 




SEC 




;M0VE IT IS BV 


206: 


0245 E5 00 




SBC 


MOVE 


; COMPUTING M0VE=1-M0V! 


208: 


0247 85 00 




STfl 


MOVE 




210: 


0249 F0 27 




BEQ 


COMPUTER 


.:IF COMPUTER'S MOVE 


212: 


024B fi9 IB 




LDR 


K'PLYRMOVE 


; PRINT THE 


214: 


024D 85 05 




STfl 


PTR 


. "'YOUR MOVE' 


216: 


024F R9 03 




LDfl 


#>PLVRM0VE 


MESSAGE 


218-' 


0251 85 06 




STfl 


PTR+1 




220: 


0253 20 EE 02 




JSR 


MESSAGE 


; DISPLAY IT 


222: 


0256 20 RF 88 


GET 


JSR 


GETKEV 


.WAIT FOR PLAYERS 


224: 


0259 C9 34 




CMP 


#*34 


; MOVE 


226: 


025B B0 F9 




BCS 


GET 


.BRANCH IF KEY} '4' 


228: 


025D C9 31 




CMP 


#*31 




230: 


025F 90 F5 




BCC 


GET 


; BRANCH IF KEYC'l' 


232: 


0261 38 




SEC 




.: CONVERT FROM ASCII 


234: 


0262 E9 30 




SBC 


#*3S 


;T0 INTEGER 


236: 


0264 85 09 




STfl 


TEMP 


.keep in temp 


238: 


0266 R5 01 




LDR 


MATCHES 


.MAKE SURE PLAYER 


240- 


826E: 33 




3 EC 




, BIDN T TRl-.£ MORE 


242 ' 


0269 E5 09 




SBC 


TEMP 


THAN WHAT'S IN PIlE 


244: 


026B 30 E9 




£M I 


GET 


.■ tPhtiCH I- SO 


246 


02SD 35 01 




STfl 


MATCHES 


. ELSE STORE RESULT 


248 ■■ 


026F 4C lfl 02 




JMP 


PRINT 


.. AND CONTINUE. 






■ *+■ + !" 


0MPUTER 


■'S MOVE*** 




250 : 


0272 A5 01 


C0MFUT 


ER LDR 


MATCHES 


; IF MATCHES=1 


252- 


8274 C9 01 




Crlh' 


#1 


.COMPUTER LUST 


254: 


0276 DO 03 




BNE 


CMCVE 




256 


0278 4C AD 02 




JMP 


FINISH 


; JUMP WITH ACC=1 




02 7B 4fl 


CM0VE 


LSR 




.COMPUTE - 


260 : 


02 7C 4fl 




LSR 




:R=4*INT(MATCHES.' , 4> 


262 " 


027D 0A 




RSL 






264: 


827E 0fl 




RSL 






2 b 6 '■ 


027F 85 0Fi 




STR 


REG 


.KEEP IT IN REG 


~!b'd ■ 


0281 38 




SEC 




.COMPUTE - 


270: 


0282 R5 01 




LDfl 


MA TCHES 


;fi=MATCHES-REO 


272 


9284 E5 0H 




SBC 


REG 




274: 


0286 85 Ofl 




STR 


REG 


.KEEP IT IN REG 


276 : 


0288 C9 01 




CMP 


#1 


•; IF REG=1 THEN 


278 : 


028R D0 13 




BNE 


CM0VE3 


JMHK'E RANDOM MOVE 






'; **:*RAND0M NUMBER GENERATOR'***; 


280 : 


028C D8 


CMGVE2 


CLD 




; BINARY ADDITION 


'^'fl'~' : 


028D H5 04 




LDR 


RND 


;GET RND 


2S4: 


028F 0R 




RSL 




; COMPUTE - 


286 ' 


0296 0fl 




RSL 




.; RND=4#RND 


288 - 


8291 18 




CLC 






298 


0292 65 04 




RDC 


RND 


.: RND=5*RND 


291: 


0294 18 




CLC 






291 


0295 63 01 




RDC 


#1 


;RND=5*RND+1 


2"h2 


0297 85 04 




STR 


RND 




294 : 


0299 29 03 




RND 


#;;800000ii 


;MAKE SURE KRND<3 


296 


S29B F0 EF 




BEG 


CM0VE2 


.:N0 ZERO'S ALLOWED 


298 : 


029D H0 12 




BNE 


DONE 


;BKANCH ALWAYS 


300 


029F 13 


CM0VE3 


CLC 






302 


02R0 H5 8fl 




LDR 


REG 


.: CONFUTE - 


394 • 


02R2 63 03 




RDC 


#3 


:REG2=REG+3 


306 : 


02H4 85 0C 




STR 


REG2 




308 ' 


0206 4fl 




LSR 




.COMPUTE - 


310 


02A7 4A 




LSR 




.: 4*INTCREG2/4> 


312 


02A8 0fl 




RSL 






314- 


02A9 0fl 




RSL 






316: 


02flfi 85 0D 




STfl 


TEMP2 


.'HMD KEEP IN TEMP2 


313: 


02flC 38 




SEC 




.: DETERMINE MOVE BY 
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23 Matches (continued) 



320 


02AD A5 0C 




FINISH 


LDFl 


P.EG2 


.: COMPUTING - 


322 


02'fiF E5 0D 






SEC 


TEMP2 


, REG2-TEMF2 


324 


02B1 85 0E 




DONE 


STfl 


SVMMGVE 


JTHIS IS COMPUTER'S MOVE 


326 


02E3 33 






SEC 






323 


02E4 A5 01 






LDfl 


MATCHES 


;TflKE AWAY FROM PILE 


330 


02B6 E5 0E 






SEC 


SVMMGVE 




332 


02ES 85 01 






STfl 


MATCHES 


:PUT RESULT EACK 


334 


02Bfl A6 0E 






ld:«: 


SVMMGVE 


,GET SEGMENT CODE 


336 


02EC ED 29 


SC 




LDFl 


SEGCODES,K 


;OF COMPUTER'S MOVE 


333 


02BF 8D 51 


03 




STfl 


COMPEVTE+1 


.; STORE IN MESSAGE 


34« 


02C2 A9 44 






LDfl 


IKCGMPMOVE 


;PRINT THE 


342 


02C4 85 05 






STfl 


PTR 


; I SELECT K" 


344 


02CS A9 03 






LDfl 


#>CGMPMOVE 


; MESSAGE 


346 


02C3 85 06 






STfl 


PTR+1 




348 


02Cfl 20 EE 


02 




JSR 


MESSAGE 


■DISPLAY IT 


35m 


02CD 4C 1A 


02 




JMP 


PRINT 


.; CONTINUE 


352 


02D0 fi5 09 




LOST 


LDfl 


MOVE 


; SOMEONE LOST 


354 


02D2 C9 01 






CMP 


#1 


;WHO IS IT PRINT 


356 


02D4 F0 @H 






EEQ 


PLAVER 


,'IF MOVE=l THEN PLHVER 


T'CjO 


02D6 A9 57 






LDfl 


1KCOMPLOSE 


; PRINT THE 


369 


02D8 85 05 






STfl 


PTR 


; " I LOSE . . " 


362 


02Dfl A9 03 






LDfl 


#>COMPLOSE 


.: MESSAGE 


364 


82DC 85 06 






STfl 


PTR+1 




■366 


02DE D0 08 






EHE 


DISMES 


.: BRANCH ALWAYS ! 


363 


02E0 R9 2D 




PLAYER 


LDfl 


KFLVRLOSE 


; PRINT THE 


370 


02E2 85 05 






STfl 


PTR 


.; "VOU LOSE . . " 


372 


02E4 R9 03 






LDfl 


#>PLVRLOSE 


, MESSAGE 


374 


02E6 85 06 






STfl 


PTR+1 




376 


02E8 20 EE 


02 


DISMES 


JSR 


MESSAGE 


.; DISPLAY IT 


378 


02EE 4C 00 


02 




JMP 


MAIN 


, START ALL OVER 








i##*DIS 


F'LfiV fl MESSAGE*** 




380 : 


02EE H0 03 




MESSAGE 


LDV 


#3 


.: NUMBER OF II I SPLAYS- 1 


382 : 


02F0 El 05 




MESS1 


LDfl 


■;ptr;v.v 


:GET A EVTE 


384 : 


02F2 30 20 






EMI 


EVE 


:IF NEG, STOP 


386 : 


02F4 91 02 






STfl 


CDISPLflV.V.V 


.; DISPLAY IT 


338 : 


02F6 88 






DEV 






330 : 


02F7 10 F7 






EPL 


MESS1 


.;KEEP GOING 


392 : 


02F9 H9 02 




DELflV 


LDfl 


#2 


.; DELAY fl LITLE EIT 


394 


02FE 85 07 






STfl 


COUNT 1 




396 : 


02FD A9 FF 




Dl 


LDfl 


#$FF 




398 : 


02FF 85 08 






STA 


C0UNT2 




400 : 


0301 20 06 


89 


D2 


JSR 


SCflHD 


,SCAN THE DISPLAV 


402 


0304 C6 08 






DEC 


C0UNT2 




404: 


0306 DO F9 






EHE 


D2 




406 : 


0308 C6 07 






EEC 


COUNT 1 




408 : 


030H D0 Fl 






EHE 


Dl 




410: 


030C E6 05 






IHC 


PTR 


:EUMP PTR 


412: 


030E D0 02 






EHE 


D3 




414: 


0310 E6 06 






IHC 


PTR+1 


.; DOUBLE BUMP 


416: 


0312 D0 Dfi 




D3 


EHE 


MESSAGE 


, BRANCH ALWAYS 


418 


0314 60 




EVE 


RTS 






418: 


03 IE 






*= 


$31 B 




450: 


03 IE 00 00 


00 


PLVRMOVE 


. EVTE 


$ 00.. $00, $ 00 


;DATfl FOR THE 


452 


03 IE 00 6E 


5C 




. EVTE 


$O0,$6E,$5C 


;"VOUR MOVE' 


454' 


0321 1C 50 


00 




. EVTE 


$1C,$50,$00 


.: MESSAGE 


456 


0324 78 1C 


50 




. EVTE 


$78,$1C,$50 




458 


0327 54 00 


80 




. EVTE 


$54, $00, $00 




460 


032R 00 00 


80 




. EVTE 


$00, $00. .$80 




470 


032D 00 00 


f"10 


PLVRLOSE 


. EVTE 


$00, $00 ..$00 


:DATA FOR THE 


472 


0330 00 6E 


5C 




. EVTE 


$00,$6E.. $5C 


.; "VOU LOSE. ." 


474 


0333 1C 06 


■~J ( Q 




. EVTE 


$1C$00,$38 


; MESSAGE 


476 


0336 3F 6D 


79 




. EVTE 


$3F,$6D,$79 




478 


0339 00 76 


y? 




. EVTE 


$00, $76.. $77 




480 


033C 00 76 


77 




. EVTE 


$00, $76, $77 




482 


033F 00 00 


00 




.EVTE 


$00 , $00 , $00 




484 


0342 00 80 






. EVTE 


$00 , $80 




430 


£1344 £ig gg 


00 


COMPMOVE 


. EVTE 


$00 , $00 , $00 


:DATfl FOR THE 


492 


0347 00 06 


00 




. EVTE 


$00 , $06 , $00 


; I SELECT K" 


494 


034fl 6D 79 


38 




. EVTE 


$6D,$79,$38 


; MESSAGE 


496 


034D 79 39 






. EVTE 


$79, $39., $78 




498 


0350 00 FF 


00 


COMPEVTE 


. EVTE 


$00,$FF,$00 




500 


0353 00 00 


00 




. EVTE 


$00, $00, $00 




502 


0356 80 






. EVTE 


$80 




520 


0357 00 00 


00 


COMPLOSE 


. EVTE 


$00 , $00 , $00 


:DATA FOR THE 


C'-r-J 


035fl 00 06 


00 




. EVTE 


$00, $06, $00 


;"I LOSE.." 


524 


035H 38 3F 


6D 




. EVTE 


$38,$3F,$6D 


.: MESSAGE 


526 


0360 79 00 


7C 




. EVTE 


$79,$00,$7C 






0363 5C 5C 


00 




. EVTE 


$5C,$5C,$00 




530 


0366 78 06 


6D 




. EVTE 


$78,$G6,$6D 




532 


0369 6D 00 


00 




. EVTE 


$6D , $00 , $00 


AlCftO 


534 


036C 00 00 


86 




.EVTE 


$00 , $00 , $80 



New Publications 



(continued) 



features; Programming the Joystick; 
Backgammon; SMARTY; BOMBER; 
ROBOT ATTACK; BALL, SMART; BAR- 
RIER; KNIGHT-BATTLE; CALENDAR; 
GUNFIGHT; Appendix; The Video Pro- 
cessor "ANTIC" and the Atari 400/800; 
Display List Interrupts and the Atari, Atari 
400/800 and CTIA/GTIA; The Atari 
400/800 and its Character Set. 

Apple II Assembly Language, by Mar- 
vin L. De Jong. Howard W. Sams & 
Co., Inc. (4300 West 62nd St., In- 
dianapolis, IN 46268), 1982, 334 pages, 
5W x 8V4 inches, paperback. 
ISBN: 0-672-21894-1 $15.95 

This is a 6502 assembly-language man- 
ual written for the beginning assembly- 
language programmer on the Apple II. 
Dr. De Jong introduces each topic in a 
building-block concept, starting with a 
description of a microcomputer and 
continuing through interrupt program- 
ming and real-time applications. The 
book is carefully written and well il- 
lustrated with programming examples. 
The only possible flaw with the book is 
that it quickly gets technical after the 
first half dozen chapters. If the reader 
were truly a beginner, he would find 
the material difficult. 

CONTENTS: The Microcomputer System,- 
Writing and Executing Simple Assembly- 
Language Programs; Branches and Loops; 
Logical Operations and Shift and Rotate 
Operations; Arithmetic Operations; Ad- 
dressing Modes: Indexed Addressing; Sub- 
routines, The Stack and Interrupts; Addi- 
tional Programming Topics; Programming 
with the 6522; Applications; Decimal, 
Binary, and Hexadecimal Number Systems; 
Additional Circuits and Programs; Pin Dia- 
grams of Some Integrated Circuits; Index. 

Phil Daley 
MICRO Staff 

Kids and the Apple, by Edward H. 

Carlson. Reston Publishing Company, 

Inc. (Reston, VA), 1982, 218 pages, 

paperback. 

ISBN: 0-8359-3669-4 $19.95 

This book teaches Applesoft BASIC on 
both disk-based or cassette Apple 
systems to children from 10-14 years 
old. The book is intended for self- 
study, but may also be used in a 
classroom setting. The lessons contain 
explanations, examples, exercises, and 
review questions. Notes for the instruc- 
tor summarize the lesson material, pro- 
vide helpful hints, and give good 
review questions. 

CONTENTS: Introduction; Graphics, 
Games, and All That; Advanced 
Programming. JMCAO" 
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Chances are, when you 
bought your first disk drive, it 
was an Apple. Now that you're 
ready for a second, take a look 
at Quentin. 

Our Apple* -Mate™ 5 1 A" Disk 
Drive is fully software transparent 
with Apple's DOS 3.3 operating 
system in full and half track 
operation. 

Add it to your present drive for 
greater capacity and faster access. 
Just plug it in and go to work. 

And the Apple- Mate has these 
High Performance advantages: 

ON TRACK HEAD SEEK 

A precision lead screw positions 
the head onto the correct track. 
Time-consuming retries and 
disk-td-disk copying errors are 
virtually eliminated. 

SIEMENSt DISK DRIVE 

The apple-beige unit is built 
around the highly reliable 



Siemens system with over 
10,000 lifetime hours. Shielded 
connecting cable also attached. 

LONG TERM 
DEPENDABILITY 

MTBF (Mean Time Between 
Failures) — 8,500 power-on hours, 
and the unit has a one-year 
warranty. 

COUNT ON QUENTIN 
FOR QUALITY 

Quentin Research was building 
disk systems for the computer 
industry when Apple was a little 
bud on the big computer tree. 
We're known for product reliabil- 
ity and stand behind every system 
we sell you. 

But the best news may be the 
price— only $335.00 (40 tracks). 



A special introductory offer 
when you order Apple-Mate 
directly from us. 

So when you're ready to boost 
the juice on your Apple, add-on 
the Quentin Apple- Mate. 

To order: Check, money order, 
Visa or Mastercard number. Calif, 
residents add 6% sales tax. 
Allow one week delivery. 



iQucrrnni 



RESEARCH, INC. 

19355 Business Center Drive 
Northridge, California 91324 
(213)701-1006 



•J.. 



MORE JUIC 
FOR YOUR 
APPLE 



Special 
Introductory 
Price: 
$335.00 



® Apple is a registered trademark of Apple Computer, Inc. 
tSiemens is a trademark of Siemens Corporation. 
'Apple-Mate is a trademark of Quentin Research, Inc., 
which does not manufacture Apple computers. 



GAMES FEATURE 



Solve the Pagoda Puzzle 
Using Recursive Assembly 



by Sherwood Hoyt 



This routine solves the 
"Pagoda" or "Tower of Hanoi" 
puzzle, using a recursive 
subroutine — one that calls 
itself. Four stacks are 
maintained for passing 
parameters. 



Pagoda Solver 

requires: 

6502 computer with 2K 
(uses 13 page-zero locations, 
and character OUTPUT and 
INPUT routines — provided for 
PET, Apple, and OSI OS-65D). 



The Pagoda Puzzle is a game using a 
rectangular platform with three pegs 
sticking vertically out of it. The peg 
sticking out of the left side of the board 
has a number (usually eight) of discs 
stacked on it. The discs get smaller as 
you near the top of the stack (see figure 
1). The object is to move the discs, 
which could be called a tower, from the 
peg on the left of the board to the peg on 
the right. There are only two rules to 
the game; move only one disc at a time, 
and never put a disc on top of another 
one so that the larger one is on top. 

According to Peter Grogono's book 
Programming in Pascal (where I first 
read about this game and the algorithm 
to solve it), the game was accompanied 
with literature saying that priests in 
the Temple of Bramah played the 
game. When they finished their game, 
it signified the end of the world. Ap- 
parently the priests were playing with 
64 discs. It would take roughly 18.4 
billion billion moves to solve a 64-disc 
game. According to Peter Grogono, and 
some rough calculations that I made, it 
would take a powerful computer about 
a million years (if it could run that 
long) just to compute, not to mention 
print, the moves for a 64-disc game. It 
would take my OSI computer about 60 
million years. 



One function that can be used to 
calculate the number of moves for n 
discs is ( (2An)-l). A 4-disc game 
would take 15 moves; eight discs, 255. 
The number of moves the game takes 
as the number of discs goes up is 
exponential. 

Recursion and the Tower 

The recursive procedure to move 
the tower is quite simple; see listing 1 . 
Let's assume that the pegs are num- 
bered from one to three. The tower is 
stacked on peg 1, and is supposed to be 
moved to peg 3. The procedure is called 
initially with four parameters. 
NMDISC is the number of discs on the 
tower, FROM is set to peg 1, TO is set 
to peg 3, and USING is set to peg 2. 



and USING receives the value of TO. 
The same thing is done in the third 
statement with FROM and USING. 
The second statement prints a move; a 
disc is taken off peg FROM and put on- 
to peg TO. The algorithm in this pro- 
cedure is used in the assembly- 
language program to solve the puzzle. 
The trick to a recursive procedure is 
in maintaining distinct values for the 
local variables of the procedure, so that 
when the procedure calls itself the 
variables have separate values, though 
the names of the variables may be the 
same. To accomplish this, the variable 
values can be put on a stack (a block of 
memory pointed to by a stack pointer] 
in much the same way that return ad- 
dresses for a JSR are put on the 6502 
stack. In a procedure, this is done to be 



Figure 1 



I 

I 

I 

DDO 

DDDDD 

DDDODDD 

DDDDDDDDD 

DODDODODDDD 

DDDDDDDDDDDDD 

DDDDDDDDDDDDDDD 

DDDDDDDDDDDDDDDDD 



THE PAGODA PUZZLE 



The first operation of the procedure 
is to check the number of discs left on 
the tower. If the number is not greater 
than zero, control returns to the calling 
procedure. If the condition is true 
(NMDISO0), then the three state- 
ments between the IF...ENDIF are ex- 
ecuted. The first statement is a recur- 
sive call. You can see that the number 
of discs passed is equal to the current 
number of discs minus 1, and para- 
meters TO and USING are passed so 
that TO receives the value of USING 



able to pull the values out of the "deep 
freeze" when control returns to the 
procedure. When a procedure is called, 
and there may be indefinitely many 
nested calls, its values are pushed on 
top of the stack. For the program to 
remember where the top of the stack is, 
a pointer is used that always points to 
the top. In my assembly-language pro- 
gram, the pointer is register Y, and it is 
incremented before a value is pushed to 
the stack, and decremented to pop a 
value off of the stack. 
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SERIOUS CBM® USERS 
NEW FROM KILO 

"The Serious Solution" 

6809 + MICROWAREOS-9* + BASIC09* 



Tired of the frustrating limitations of Commodore Basic? Need to get a 
serious programming language for your Commodore computer? KILO of- 
fers The Serious Solution. A 6809 plug in adaptor board including OS-9 
Level I Operating System in ROM, Basic09* and 16K RAM expansion. 
The KILO 6809 adaptor board simply plugs in to your Commodore com- 
puter. The switching between 6502 and 6809 is under software control. 
Expansion RAM can be used to replace protection ROMs with 6502. 

With The Serious Solution, all Microware software can now be run on 
your computer. The standard package comes with the Basic09 Struc- 
tured Basic Interactive Compiler. The fastest and most comprehensive 
full Basic language available for the 6809. This combines standard 
Basic with the best features oi PASCAL. It features compiler speed, 
interpreter friendliness and superlative debugging facilities. Option 
available includes Run B...a ROMable run-time system for compiled 
Basic-09. 

Please note: The OS-9 distribution disk format is not compatible with 
the Commodore disk format. OS-9 software purchased from sources 
other than KILO may need to be reformatted. KILO will provide this 
service at $10.00 per disk. Software venders should contact KILO 
for SS-50 to Commodore adaptor hardware and software. 

SPECIAL: Buy The Serious Solution before Christmas and 
get Editor/Assem./Debug package for $200. 



The Serious Solution $489 

including 6809 adaptor board, 
OS-9 Level I operating system 
in ROM, Basic09 and 16K RAM 
expansion. 

Microware* Software Options 

PASCAL compiler $400 

C Compiler $400 

CIS COBOL Compiler $895 

Editor/Assem./Debug package $300 



VISA and Mastercard welcome. Don't forget last month 





CBM and Commodore are registered trademarks of Commodore Computer, OS-9 and Basic09 are registered 
trademarks of Microware and Motorola. CIS COBOL is a trademark of Micro Focus, Inc. 

KILO CORPORATION • P.O. Box 7530 • Ann Arbor, Ml 48107 • 313 668-1566 
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Listing 1: Recursive Procedure In 
Pseudo-Code 

PROCEDURE MOVE RECEIVE 
(NMDISC,FROM,TO,USING) 

IF NMDISC > THEN 

CALL MOVE WITH(NMDISC - 1, 
FROM ; USING,TO) 

PRINT FROM," -» ",TO 

CALL MOVE WITH(NMDISC - 1, 
USING,TO,FROM) 

ENDIF 

END PROCEDURE 



The Recursive Assembly-Language 
Program 

In the assembly-language program 
(listing 2), there are four zero-page loca- 
tions (lines 130-160) for passing values 
to the recursive procedure labeled 
MOVE [lines 530-820). Values are 
passed from recursive procedural calls 
via these locations, as well as initially 
from the calling routine. The calling 
routine (lines 470-490) jumps to lines 
1590-2360 to initialize the parameters 
and stack pointers. Register Y is used as 
the stack index, and is initialized to 
$FF. When MOVE is called, register Y 
is incremented before the values passed 
are actually pushed on the stack, so 
that the procedure, when first called, 
will increment register Y to $00, then 
push the values on the stack indexed by 
register Y. 

The stack pointers are initialized 
next. There are four stacks, one stack 
for each value that is passed. When the 
procedure is called, register Y is incre- 
mented so that it points to a new stack 
position. The total number of bytes 
used in each stack for any given game is 
equal to the number of discs on the 
tower. Each stack occupies one page 
($00-$FF) of memory. Actually, the 
stack size only needs to be one half of a 
page because the number of JSRs that 
can be executed, and therefore the 
number of recursive calls and separate 
values, is limited by the 6502's one- 
page stack, which can only hold $80 
two-byte return addresses. The largest 
tower that this program can move has 
approximately $70 discs on it, which 
allows part of the stack to have been used 
already by the calling routine. However, 
having a maximum game of $70 discs is 
obviously no problem if it would take a 
computer a million years just to solve a 
$40 (decimal 64) disc game! 

After the initialization routine 
stores zero in the location that holds 



n 


Listing 


2 




0010 


;««*#•••*«••««•*•*•*«*««««**••• 












0028 


:* 






* 












0038 


;* 


PRGGDP. 


SOLVER 


* 












0848 


!* 






* 












0858 


;* 


by Sherwood Hoyt. 


• 












8868 


•■* 






* 












8870 


.>*****•****•***•**•***•****•*** 












0888 




















0898 


; parameters passed 














0108 




















0118 




.ba 


*54 




J PET 










8128 


jOS-650 


— *10j Apple — *-f8 














8130 


nmd i sc 


.de 


= 














8140 


■from 


.de 


nmdisc-M 














0150 


■to 


.de 


-from+1 














0168 


using 


.de 


to+1 














0178 


; 


















0188 


} St 


ack ptr' 


s to local va 


lues 












0198 




















0288 


nptr 


.de 


using+1 














0218 


■fptr 


.de 


nptr+2 














0228 


tptr 


.de 


■fPtr+2 














0238 


uptr 


.de 


tptr+2 














0240 


> 


















0258 


.: st 


ack location 














8268 


; 


















0278 




.ba 


si 308 




,s*4800 — 0S-65D; *888 — fipp 1 










8288 


nstack 


.de 


= 














0290 


■f stack 


.de 


nstack+*188 














0388 


tstack 


.de 


■fstack+Siee 














8318 


ustack' 


.de 


tstack+siea 














0328 


; 


















0330 


; misce I laneous 














8340 


1 


















0350 


nmoves 


.de 


uptr+2 




; current number o-f moves 










0368 


i nput 


.de 


s-f-fc-f 




;get character 










0378 


rRpple- 


-»-fd8cj 


OS-65D — S2339 














0388 


output 


■ de 


»-f-fd2 




;output character 










0398 


jflpp le- 


-*-fded,s 


0S-65D — S2343 














0488 


return 


.de 


*8d 














8410 


l-f 


.de 


*8a 














0420 


> 


















0430 




.ba 


ustack+*180 




J0S-65D — *317e 










0440 


; 


















0450 




















0460 


; ca 


11 major subroutines 















0470 












1C88- 


20 


BB 


1C 


8480 




Jsr 


init 




;init. ptr's * parameters 


1C83- 


20 


09 


1C 


8498 




Jsr 


move 




;call proc. to move toiuer 


1C86- 


4C 


70 


ID 


8580 
8510 




jmp 


done 














0520 


; recursive 


procedure to move tower 










8538 












1C89- 


20 


H9 


1C 


0540 


move 


jsr 


push 




;push values to stack 


1C8C- 


Bl 


58 




0558 




Ida 


<nptr> ,y 




;get # o-f discs le-ft 


1C8E- 


F0 


20 




0568 
0578 


J 


be«i 


ret 




! i -f = 8 then pop pr ocedur e 


1C10- 


Bl 


58 




0588 




'Ida 


<nptr> ,y 




;get values to toe passed 


1C12- 


85 


54 




8598 




sta 


•nmdisc 






1C14- 


C6 


54 




0688 




dec 


•nmd i sc 




;de. # o-f diiscs on tower 


1C16- 


Bl 


50 




0610 




Ida 


<-fPtr>,y 






1C18- 


S5 


55 




8628 




sta 


•■from 






icin- 


Bl 


5C 




0638 




Ida 


<tptr),K 






1C1C- 


85 


57 




0648 




sta 


♦using 




;store 'to' in 'using' 


1C1E- 


Bl 


5E 




0658 




Ida 


(uptr) ,y 






1 C20- 


es 


56 




0668 




sta 


•to 




;store 'using' in 'to' 


1C22- 


20 


09 


1C 


0678 
0638 




jsr 


move 






1 CZ5- 


20 


3F 


1C 


8698 
8788 




jsr 


prmove 




;di splay a move 


1C28- 


Bl 


58 




0718 




Ida 


<nptr> , y 




;pass values to next proc. 


1C2B- 


85 


54 




0720 




sta 


•nmdisc 






1 C2C- 


C6 


54 




0730 




dec 


•nmdisc 




;dec. # o-f discs on tower 


1C2E- 


Bl 


50 




0740 




Ida 


<-fPtr>,y 






1C38- 


35 


57 




8738 




sta 


•using 




.(store 'fro*' in 'using' 


1 C32- 


Bl 


5C 




8768 




Ida 


<tptr>,y 






1C34- 


85 


56 




0770 




sta 


•to 






1C36- 


Bl 


5E 




8788 




Ida 


<uptr).-y 






1C38- 


85 


55 




8798 




sta 


•■from 




;store 'using' in '-from' 


1 C30- 


20 


09 


1C 


8880 
8818 




jsr 


move 




,ido recursive call 


1C30- 


88 






8328 


re-t 


dey 






:pop procedure -from stack 


1C3E- 


68 






8338 




rts 






(continued) 
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I GAMES FEATURE 

Figure 2: Sample Runs 

ENTER TOWER SIZE: 3 



0001 


1 — 3 


0002 


1 — 2 


0003 


3 -*■ 2 


0004 


1 — 3 


0005 


2 — 1 


0006 


2—3 


0007 


1 — 3 



*** DONE «** 



ENTER TOWER SIZE: 4 



0001 


1 — 


2 


0002 


1 — 


3 


0003 


2 — 


3 


0004 


1 — 


2 


0005 


3 — 


1 


0006 


3 - 


2 


0007 


I -*■ 


2 


0008 


1 — 


3 


0009 


2 — 


3 


000A 


2 — 


1 


000B 


3 — 


1 


oooc 


2 — 


3 


000D 


1 -* 


2 


000E 


1 — 


3 


000F 


2 -* 


3 



**« DONE *** 



the current number of moves (lines 
1830-1850], it stores the initial values 
for the FROM, USING, and TO pegs 
(lines 1890-1940). Then in lines 
1980-2030 the prompt "ENTER 
TOWER SIZE:" is displayed, and lines 
2080-2360 input the user response. The 
input routine will only accept a one- or 
two-digit hexadecimal number. If a 
one-digit number is entered, the return 
key must follow it. If two digits are 
entered, the program will continue ex- 
ecution and no return needs to be 
entered. 

The next call that the calling 
routine makes, after initialization, is to 
the recursive procedure,- MOVE. The 
first operation is to push the variables it 
receives onto the stack. This allows the 
variables for each successive calling of 
the procedure to be maintained sepa- 
rately. When the procedure is finished, 
the stack index will be decremented 
(line 810], effectively popping the 
variables off of the stack. The only 
other thing done with the variables is 
for the procedure to call itself with the 
variables (in slightly modified form) as 
parameters. This the procedure per- 
forms twice. Also, between the two 
recursive calls, the procedure calls 
PRMOVE from line 860-1030 to display 
a move. The variables FROM and TO 
are passed to it. FROM is the peg to 



Listing 2 (continued) 











0840 


















0850 


; print a moue 












0868 










1C3F- 


20 


60 


1C 


0870 


prrnoye 


jsr 


prnum 


; print current # o-f moves 


1C42- 


Bl 


50 




0880 




Ida 


<-fptr>,y 




1C44- 


09 


38 




8890 




ora 


•*38 




1C46- 


20 


D2 


FF 


0900 




jsr 


output 


;print peg # to take disc 


1C49- 


H2 


81 




0910 




Idx 


•*01 


; print ' -> ' 


1C4B- 


BD 


67 


1C 


0920 


Pi 


Ida 


p3,x 




1C4E- 


F0 


06 




0930 




be<i 


p2 




1C50- 


20 


02 


FF 


0948 




jsr 


output 




1C53- 


E8 






0950 




inx 






1C.54- 


D0 


F5 




0960 




ton* 


pi 




1C56- 


Bl 


SC 




0970 


p2 


Ida 


< tptr > , y 




1C58- 


09 


30 




0980 




ora 


•*30 




1C50- 


20 


D2 


FF 


Q990 




jsr 


output 


j print peg# to put disc on 


1C50- 


09 


0D 




1000 




Ida 


•return 


,» new I i ne 


1CSF- 


20 


D2 


FF 


1010 




jsr 


output 




1C62- 


09 


■30 




1020 




Ida 


• 1-f 




1C64- 


20 


02 


FF 


1030 




Jsr 


output 




1C67- 


60 






1040 


p3 


rts 






1C68- 


20 


20 


3E 


1050 




■ by 


' -> ' 00 




1C6B- 


20 


00 




1860 


> 
















1070 


I pri 


nt current number 


o-f moves 










1080 


> 








1C60- 


ES 


60 




1090 


prnum 


inc 


♦nmoves 


fbump # o-f moves up one 


1C6F- 


D0 


02 




1100 




bne 


prnum 1 




1C71- 


E6 


61 




1110 




inc 


•nmoves+1 




1C73- 


05 


61 




1120 


prnum 1 


Ida 


•nmovest 1 




1C75- 


4fl 






1130 




Isr 


a 


;shl-ft high nibble right 


1C76- 


40 






1140 




Isr 


a 




1C77- 


40 






1150 




Isr 


a 




1C78- 


40 






1160 




Isr 


a 




1C79- 


20 


90 


1C 


1170 




Jsr 


dspbyt 


^display -first digit 


1C7C- 


05 


61 




1180 




Ida 


*nmoves+l 




1C7E- 


20 


90 


1C 


1190 




jsr 


dspbyt 


.(display second digit 


1C81- 


05 


60 




1200 




Ida 


•nmoves 




1C83- 


40 






1210 




Isr 


a 


;shi-ft high nibble right 


1C84- 


40 






1220 




Isr 


a 




1C85- 


40 






1230 




Isr 


a 




1C86- 


40 






1240 




Isr 


a 




1C87- 


20 


90 


1C 


1250 




jsr 


dspbyt 


;display third digit 


1C80- 


05 


60 




1260 




Ida 


♦nmoves 




1C8C- 


20 


90 


1C 


1270 




Jsr 


dspbyt 


^display fourth digit 


1C8F- 


09 


20 




1280 




Ida 


•»20 


Joutput 2 blanks 


1C91- 


20 


02 


FF 


1298 




Jsr 


output 




1C94- 


09 


20 




1300 




Ida 


•*20 




1C96- 


20 


D2 


FF 


1310 




Jsr 


output 




1C99- 


60 






1320 
1330 


t 


rts 














1340 


f conytrt byte to ascii 


and d i sp lay 










1350 


t 








1C90- 


29 


0F 




1360 


dspbyt 


and 


#*0-f 


t clear high nibble 


1C9C- 


09 


30 




1370 




ora 


•»30 


> convert to ascli 


1C9E- 


C9 


30 




1380 




emp 


•*3a 


>check -for 'a'-'-?' 


1CO0- 


90 


03 




1390 




bec 


dspbl 


jbranch i+ not 


1C02- 


18 






1400 




c\c 






1C03- 


69 


07 




1410 




adc 


#»07 




1C05- 


20 


D2 


FF 


1420 


dspbl 


Jsr 


output 


(display digit 


1C08- 


60 






1438 
1440 


J 


rts 














1450 


> pus 


h procedure values on stacks 










1460 


> 








1C09- 


C9 






1470 


push 


iny 




;bump index for new values 


1COO- 


05 


34 




1430 




Ida 


•nrnd i sc 


.ipush # o-f discs to stack 


1COC- 


91 


58 




1490 




sta 


< nptr > , y 




1COE- 


05 


55 




1508 




Ida 


•-from" 


;push '-from' peg to stack 


1CB0- 


91 


50 




1510 




sta 


<-fPtr>,y 




1CB2- 


05 


56 




1520 




Ida 


•to 


J push 'to' peg to stack 


1CB4- 


91 


5C 




1530 




sta 


<tptr>,y 




1CB6- 


05 


37 




1540 




Ida 


•using 


;push 'using' peg to stack 


1C.B8- 


91 


SE 




1530 




sta 


<uptr> ,y 




1CBO- 


60 






1560 
1578 


> 


rts 














1580 


i ini 


tialize stack ptr' 


s 










1590 


t 








1C.BB- 


flO 


FF 




1600 


lnlt 


Idy 


#*-f-f 


;set stack index 










1610 


fgets bumped to -for 1st 


values 


1CBD- 


09 


00 




1620 




Ida 


* Unstack 


jset 'nmdisc' stack ptr. 


1CBF- 


85 


58 




1630 




sta 


•nptr 




1CC1- 


09 


18 




1640 




Ida 


#h,nstack 




1CC3- 


85 


59 




1650 
1660 




sta 


•nptr+1 




1CC5- 


09 


00 




1670 




Ida 


• 1,-f stack 


f set 'from' stack ptr. 


1C.C7- 


85 


30 




1680 




sta 


••fptr 




1CC9- 


09 


19 




1690 




Ida 


#h,.f stack 




1CCB- 


85 


5B 




1700 
1710 


> 


sta 


••fptr+l 




1CCD- 


09 


00 




1720 




Ida 


• Wtstack 


jset 'to' stack ptr. 


1CCF- 


85 


3C 




1730 




sta 


• tptr 




1CD1- 


09 


10 




1740 




Ida 


#h,tstack 




1CD3- 


85 


5D 




1750 
1760 


t 


sta 


•tptr+1 




1COS- 


09 


00 




1770 




Ida 


# l,ustack 


jset 'using' stack ptr. 


1C07- 


83 


5E 




1780 




sta 


•uptr 




1CD9- 


09 


IB 




1790 




Ida 


#h,ustack 




1CDB- 


85 


5F 




1800 
1310 


t 


sta 


•uptr+1 












1820 


f set 


number o-f moves to zero 










1330 


t 






fr.nntinn 



56 
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Listing 2 (continued) 



1CDD- H9 00 
1CDF- 85 6a 
1CE1- 85 61 



1CE3- 1=19 81 
ICES- 85 55 
ICE?- H9 83 
1CE9- 85 56 
1CEB- H9 82 
ICED- 85 57 



1CEF- 
1CF1- 
1CF4- 
1CF6- 
1CF9- 
1CFH- 
1CFC- 
1CFF- 
1D02- 
1005- 
1008- 
1088- 
1D0E- 
1D1 1 — 



1012- 
1D15- 
1D17- 
1019- 
1D1C- 
1D1E- 
1D21- 
1D24- 
1026- 
1029- 
1D2B- 
1D2D- 
1D30- 
1032- 
1035- 
1038- 
103H- 
103C- 
103E- 
1D40- 
1042- 
1044- 
1046- 
1049- 
104B- 
104E- 
1050- 
1D53- 



1054- 
1D56- 
1D38- 
1030- 
105C- 
105E- 
1D60- 
1P62- 
1D64- 
1D63- 



28 CF FF 
C9 0D 
F0 2B 
20 54 10 
88 F4 
20 D2 FF 
20 66 10 
85 54 
20 CF FF 
C9 00 
F0 17 
20 54 ID 
Be F4 
20 D2 FF 
20 66 10 
06 54 
06 54 
06 54 
06 54 
05 54 
85 54 
09 00 
20 02 FF 
09 0fi 
20 02 FF 
H9 00 
20 DZ FF 
60 



C9 3B 
90 0C 
C9 3H 
98 89 
C9 41 
98 04 
C9 47 
90 01 
38 
60 



1D66- C9 41 
1068- 98 83 
1061=1- 18 
106B- 69 09 
1D6D- 29 8F 
106F- 60 



1078- 
1072- 
1075- 
1D77- 
1D7H- 
107B- 
1D70- 



H2 81 
80 70 10 
F8 86 
20 D2 FF 
E8 
08 F5 



Ida 0*00 
sta ftnmoues 
sta *nmoues+l 

initialize beginning parameters — 



02 08 

BD FC 1C 
F0 1C 
20 D2 FF 
ES 

00 F5 
00 00 00 
45 4E 54 
45 52 20 
54 4F 57 
45 52 20 
53 49 50 
45 30 20 
00 



1848 
1858 
1868 
1878 
1380 
1890 
1908 
1910 
1928 
1930 
1940 
1950 
1960 

1978 t display prompt — 

198Q ) 

1990 prompt 

2800 

2010 

2020 

2030 

2040 

2050 pro3 



Ida 0*81 
St* *+rom 
Ida **03 
sta <»to 
Ida **02 
sta *using 



jset '-from' -to peg »1 
jset 'to' to peg #3 
;set 'using' to peg 42 



Idx »*00 

Ida pro3,x 

beci #nttr 

jsr output 

inx 

bne prompt+2 

.toy 1+ 1+ return 



'ENTER TOWER SIZE» 



107E- 90 00 0D 

1081- 20 20 20 

1084- 28 44 4F 

1D87- 4E 45 28 

1080- 20 20 20 

1080- 00 80 80 



input number o+ discs on tower 



2060 

2070 

2088 

2898 enter 

2180 

2110 

2120 

2138 

2148 

2150 

2160 

2170 ent2 

2188 

2198 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2278 

2280 

2290 

2380 ent3 

2318 

2320 

2338 

2340 

2350 

2360 

2370 , 

2388 

2390 

2400 chno 

2410 

2428 

2430 

£448 

2450 

2468 

2478 

2488 invlid 

2498 valid 

2588 } 

2518 jstrip 

2520 . 

2530 strip 

2540 

2550 

2560 

2578 st3 

2580 

2590 ; 

2600 ; -finished moving tower 

2610 ; 



jsr input 
emp trrturn 
be«i ent3 
j sr chno 
bes enter 
jsr output 
Jsr strip 
sta Vnmdisc 
jsr input 
emp #return 
toeoi ent3 
Jsr chno 
bes ent2 
Jsr output 
Jsr strip 
as I »nmdisc 
as I *tnmd i sc 
as I Wnmdisc 
as I fttnmdlsc 
or a Anmdisc 
sta fttnmdlsc 
Ida «l-f> 
Jsr output 
Ida «w 
jsr output 
Ida #return 
Jsr output 
rts 

check -for ualld hex number 

emp #'0 
bec inulld 
emp #' i 
bec valid 
emp a'O 
bec invlid 
emp »'0 
bec valid 



rts 

sell -from input 

emp »'fi 

bec st3 

clc 

adc #*09 

and #*8-f 

rts 



jdone inputting 

jnot a hex digit 
(display valid digit 
jstrip aseli from digit 
Jstore -first digit 



(done Inputting 

(not a hex digit 
(display valid digit 
(Strip ascii -from digit 
(si-ft 1st digit le+t 



(pack 2nd digit mith 1st 

(store it 

(space 2 lines down 



(add 9 i-f digit 
(Strip ascii 



2620 done 

2630 

2640 

2630 

2660 

2670 

2680 do 3 

2698 ( 

2780 



2718 > 
2728 



(print that it is done 



idx **ei 

Ida do3,x 
beci do3 
Jsr output 
inx 

bne done+2 
rtI (return to operating syste 

.by 1+ If return '**• DONE •*■ 14 return 30 



take the disc from, and TO is the peg to 
put the disc onto. 

Trial Run 

In figure 2 there are two trial runs. 
The first one solves the puzzle for three 
discs and the second for four discs. 
Remember, the number of discs that 
you enter at the prompt 'ENTER 
TOWER SIZE:' is assumed to be a hex- 
adecimal number. A carriage return is 
required if the number entered has only 
one digit. (Ed. Note: The routine is 
written to echo the character received 
to the screen. If your machine's INPUT 
routine does this automatically, the 
character will appear twice on the 
screen. You may want to skip the 
echoes in lines 2130 and 2210.) A four- 
digit hexadecimal number in the first 
column of output shows the number of 
moves. This number will turn over to 
'0000' after it reaches 'FFFF. The 
number in the second column tells 
which peg to take the disc off of and the 
number in the fourth column tells 
which peg to put the disc onto. 



The author may be contacted at Rt. 1, Box 
56, Sand Springs, OK 74063. 



AMCftO 



/ 



Kill*- 



MEMOREX 

\ferbatim. 

maxell 
BASF 

w 



• K K 



Diskettes and all your media needs 
Our REGULAR prices are SPECIAL 

CALL FREE (800) 421-3957 

C.O.D. charge cards accepted. 
Excellent dealer program. 




1418 West Shaw Avenue 
Fresno, C A 93711 

lnVaLcaU 1209) 221-1118 
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Lyco Computer Marketing & Consultants 

TO order TQLL FREE 8 oo-233-8760 



CALL US 



In PA 1-71 7-398-4079 



November 810 

ATARI 32 K 

SPECIALS 400 



Disk Drive .... $429.00 

RAM $ 79.00 

16K $255.00 



800 48K $639.00 



PERCOM : In Stock 

Single Drive CALL 

Dual Drive CALL 

(Read all Atari Disks) 



PRINTERS : In Stock 

Epson Mx 80 $449.00 

Epson Mx 80 FT III $499.00 

Okldata 82A $479.00 

OKidata83A $719.00 

Okidata 84 $1 089.00 

Citoh CALL 

NEC CALL 

(Interfacing Available) 

JOYSTICKS : In Stock 

Atari CX-40 $18.00 

LeStick $34.00 

Wlco Command Control $24.00 



Computer Covers : 

800 $6.99 

$6.99 

$6.99 



400 
810 



DISKETTES : In Stock 

Maxell MD1 . . .(10) $34.00 

Maxell MD2 . . .(10) $44^00 

Elephant . . .(TO) $21 .00 



THIRD PARTY SOFTWARE 
ATARI PROGRAM EXCHANGE 



Eastern Front 1 941 

Avalanche 

Outlaw/Howitzer . . . 
Dog Daze 

Wizard of War 

Gorf 

Frogger 



... $25.50 

.. $15.50 

. $15.50 

. $15.50 

$31.00 

$31.00 

$26.00 

BUSINESS SOFTWARE : In Stock 

Atari Word Processing $ 1 09.00 

Letter Perfect j-| 29,00 

TestWizzard $ agoo 

Datasam/65 $125.00 

Interlisp $1 25.00 

Monkey Wrench $ 4200 



ATARI HARDWARE 

410 Cassette Recorder $75.00 

825 Printer $585.00 

830 Phone Modem $149.00 

850lnterface $164.00 

PACKAGES 

CX481 Entertainer $69.00 

CX482 Educator $1 25.00 

CX483 Programmer $49.00 

CX494 Communicator $325.00 

SOFTWARE 

CXL4013 ASTEROIDS S28.75 

CXL4O04 BASKETBALL $26.75 

CX41 OS BLACKJACK S12.75 

CXL4009 COMPUTER CHESS $28.75 

CXL4012 MISSLE COMMAND $28.75 

CXL4011 STAR RAIDERS $35.00 

CXL40O6 SUPER BREAKOUT $28.75 

CXL401 3-0 TIC-TAC-TOE $26.75 

CXL4O05 VIDEO EASEL $26.00 

CXL4008 SPACE INVADERS $28.75 

CX81 30 CAVERNS OF MARS $31.75 

CXL4020 PAC MAN $32.75 

(NEW) CENTIPEDE $32.75 

CX4121 ENERGY CZAR $12.75 

CX41 08 HANGMAN $12.75 

CX41 02 KINGDOM $12.75 

CX41 1 2 STATES a CAPITALS $12.75 

CX41 14 EUROPEAN COUNTRIES.... $12.75 

CX41 01 PROGRAMMING I $19.95 

CX4106 PROGRAMMING II $22.75 

CX41 17 PROGRAMMING III $22.75 

CXL4007 MUSIC COMPOSER ... . $33.75 

CX81 02 CALCULATOR . $28.75 

CX4109GRAPHIT $16.75 

CXL4O03 Assembler Editor $45.00 

CX8121 Macro Assembler $69.00 

CXL4O02 Atari Basic $45.00 

CX81 26 Microsoft Basic $65.00 

CXL4018 Pilot Home $65.00 

CX405 PILOT EDUCATOR $99.00 

CXL4015TELELINK $21.00 

CX4123 SCRAM 



... $19.75 

CX41 07 Biorhythm $1 3.00 

CX41 1 9 French $45.00 

CX41 18 German $45.00 

CX41 20 Spanish $45.00 

CX41 25 Italian $45.00 




THIRD PARTY SOFTWARE 

for atari 800 or 400 

KBYTE 

KRAZY SHOOTOUT $35.00 

K-DOS $65.00 

K-STAR PATROL $37.75 

K-RAZY ANTICS $37 75 

K-RAZY KRITTERS $37.75 

0-BALL JOYSTICK KIT $6.75 

AUTOMATIED SIMULATIONS 

Star Warrior $28.00 

Crush, Crumble & Chomp $23.00 

WE CARRY MANY OTHER THIRD PARTY PRODUCTS 
YOU CAN CALL FOR PRICES ON AND ASK FOR 
YOUR FREE ATARI PRODUCT CATALOG. 



Qcommodo 


re 

89.00 

$67.00 
$499.00 
$355.00 
$35.00 
$52.00 
$53.00 

$45.00 
$45.00 
$23 00 

. $3500 

.. $35.00 
. . $35-00 
.. $35-00 

.. $35 00 

$21 .00 
$35.00 
$32.00 
$99.00 
S21.00 
$16.00 
.. $45.0O 


VIC1 530 DATASSETTE 


VIC1 540 DISK DRIVE 


VIC1 51 5 PRINTER 


VIC1 21 3K RAM 


VIC1110 8K RAM 


VIC1 211 A SUPER EXPANDER 


VIC-20 SOFTWARE 
VIC1 21 2 PROGRAMMER AID 


VIC1 21 3 VICMON 


VIC1 906 SUPER ALIEN 


VIC1914 ADVENTURE 

LAND ADVENTURE 


VIC1 91 5 PRIVATE COVE 

ADVENTURE 


VIC1916 MISSION IMPOSSIBLE 
VIC1917THE COUNT AOVENTURE .. 

VIC1919 SARGON II CHESS 

THIRD PARTY SOFTWARE 
ALIEN BLITZ 




Gorf 


1 6K RAM/ROM 


AMOK 


SUPER HANGMAN 


SPIDERS OF MARS 



POLICY 
Pre-paid orders receive free shipping in the continental U.S. 

Personal checks require four weeks clearance before shipping 

In-Stock items shipped within 24 hours of order 

Back-Ordered and Out-of-Stock items shipped as soon as they are available 
Cancellation of Back-Order and Out-of-Stock items prior to shipping receive 

full refund or credit towards another purchase upon request. 
All products subject to availability and price change. 



TO ORDER 
CALL TOLL FREE 

800-233-8760 

In PA 1-717-398-4079 
or send order to 
Lyco Computer 
P.O. Box 5088 

Jersey Shore, PA 1 7740 



GAMES FEATURE 



VIC/PET GOMOKU 



by David Malmberg 



A fast, machine-language 
version of the popular oriental 
game, with three user-selectable 
styles for the computer's play. 



GOMOKU 

requires: 

VIC with 3K or more extra 

RAM and joystick 

or PET with 8K or more 



GOMOKU is an ancient oriental game 
of strategy. According to Edward 
Lasker's book Go and GOMOKU 
(Dover, 1960], GO means "five" and 
MOKU means "stones." To play, you 
and your opponent alternate placing 
stones on the intersections of the lines 
of a square grid. One person plays with 
white stones and the other uses black 
stones. As the name implies, the object 
of the game is to have your stones oc- 
cupy five adjacent points on a grid — 
vertically, horizontally, or diagonally 
— before your opponent gets five of his 
stones in a row. You must get exactly 
five in a row to win. Connecting two 
chains of stones less than five long to 
form a chain greater than five stones 
long will not win the game. 

The most obvious way a player can 
force a win is to create a situation where 
he has four stones in a row with both 
ends of the chain open for potential 
stones. The opponent will be able to 
block only one end of the chain, so the 
player can win by placing a stone at the 
other end. To reach a forced win with 
an "open-four," the player must first 
create an "open-three." Whenever a 
player threatens a win by making an 
open-three, the opponent must imme- 
diately play a stone at one end of this 
chain of three in order to avoid losing 
the game two moves later. 

As GOMOKU is played in both 
Japan and China, only one type of move 
is illegal: a participant cannot play a 
stone that creates more than one open- 
three simultaneously. The oriental 



originators of GOMOKU felt that the 
game would not be enough of a 
challenge if this type of easy win were 
permitted. 

VIC/PET GOMOKU 

The computerized version of GO- 
MOKU allows the enforcement of the 
no-multiple open-threes rule to be op- 



tional. However, remember that if you 
elect to play without this restriction, 
the computer will play accordingly. 

VIC/PET GOMOKU plays an ex- 
cellent game. Its main counting and 
evaluation routines are written in 
machine language for increased speed 
and enhanced logic. The program takes 
10 to 30 seconds between moves, de- 
pending on the density of stones on the 



Listing 1 



1 RL=22:S=256*PEEK< 6485-1 :A=3072Q : IFPEEK<643:> = 16THENA=33792 

2 FH=RND<-TI5 :P0KE36879,25 :DD=371 54 :P1=37151 :P2=37152 : V=36878 |E=36876 

3 F0RI=lT0e:READX:P0KE951+I,X:NEXTI :ORTfU ,21 ,22,2-3, 123, 149,150,151 :FH=10 

4 ML=PEEK< 43 >+256*PEEK< 44) +3339. -6=111-/256 :DIMD<; 8 ),V;<< 14,1 4 :> 

5 F0RI=1T013:READX:P0KEML+X,B:NEXT 

6 DATFI2,22,51 ,54,75,91 ,184,125,136,161,178,215,256 

7 B=B+1 lFORI=lTO4:REflOX:POKEML+X,B:NEXT:DATA19,306,351,384 

9 FORI = l T08 iREAOCK I > :NEXT :DRTH-22 ,-21 , 1 ,23,22,21 ,-1 ,-23 

10 H=87:C=81 :NP*="C" :M=0:U=8 :PRINT"3 31ICRO GOMOKU" : IN*="N" 

11 PRINT'S) BV DRVIO MfiLMBERG" 

12 PRINT"S»<JANT TO MOVE FIRST " .: :GOSUBS5 :PRINT 

13 IFLEFT*<IN*,l:> = "V"THENHP*="H" 

14 IN*="W" !PRINT"WHITE OR BLOCK " ) :G0SUB85 :PRIHT : IFIN*="B"THEHH=81 :C=87 

15 P0KE95e,C:P0KE951,H:IN*=' , 2" lPRINT"JHOW SHOULD I PLHV : " :PR INT" li CAUTIOUS" 

16 PRINT" 2: BALANCED" iPRINT" 3i AGGRESSIVE 

1 7 G0SUBS5 :PRINT :X=VAL<LEFT*< IN*, 1 > > 

18 IF;O30RX<lTHENPRINT :PRIHT"1 ,2, OR 3 ONLY " ;sG0T017 

19 ZZ=6:PRINT"M=LAV OF'EN 3'S RULE " ; :GQSU885 :PRINT : IFIN*0-"V"THENZZ=1 

23 FC=6+2*X:N=3:G=7:MT=14*14:F0RI = lTG14:FQRJ=lTG14:V;i<I , J?=0 :NEXTJ : NEXT I :0=1 

21 PF;INTCHR*<2S>"a jTIICRCi GOMOKU" 

22 PRINTTHBO:i+2:>"3ABCr.iEFGHIJk'LMN" :PRlNTTAB<0 5 "SI , , , i , , , , , " :F0RI=2T013 

23 PRINTTHB<0-ORIGHT*',STR*<IJ,2J,-" I I M [ I I I I I I I I I " 

24 NEXTI :PRIHTTAB<:0-15"14 I I I I I I I I I " iPRINTTAB'Xn-3> ; "M1V MOVE:" 

25 PRINTC:HR*a44>;WH*.;CHR*<128+H.">.:"HBHH!ll"CHR*.::l28+C> 

26 IFNP*0"H"THEN31 

27 PRIHTCHR«<33:> ;UH« : " »13,'UL «iaaHM MHE " :T=H iPOKEV, 15 :FORK=195TO240 :U=TI 

28 P0KEE,K:IFTKU+1THEH23 

29 NEXT:POKEE,0:GOSUB9S:M=M+1 : VY.< I , J>=-38088 :MT=MT-1 :IFU=HTHEN76 

30 IFMT=0THEN75 

31 PRINTCHR*<30);WH*;"HT , OUSiaSISEaiMI»1EB" : IFM=8THENI=7 :J=3 SG0TO36 

32 <3M=C:GOSUB46:MX=-1E15:FORMI = 1T014:FQRMJ=1T014:IFVK<MI,MJ;":MXTHEN35 

33 IFVK<MI ,MJ>=MXANDRND< i)>. 2THEN35 

34 XJ=MJ+0+2 :XI=MI+4 :L=S+RL*<XI-1 .1+XJ :t1X=V«<MI ,MJ:> : I=MI : J=MJ 

35 NEXTMJ.-HEXTMI 

36 B*="" :IFK10THENB*=" " 

37 PRINTCHR»<2Sl,-MV*TAB'C0+12>,.B*;CHR*(J+64>MID*<STR*';I.'',2> :N=I :G-J :CL=J+0+2 

38 R=I+4:L=S+RL*<.R-l:>+CL 

39 P=PEEK'.'L3 sPOKEV, 15 :F0RK=1T06 :POKEL,P :U=TI :P0KEE,135 

40 IFTKU+8THEN40 

41 POKEL,C:POKEL+H,0iU=TI :POKEE,240 

42 IFTKU+8THEN42 

43 NEXTK:POKEV,esPOKEE,0:T=ClC.OSUB68:MT=MT-l jIFW=CTHEN76 

44 IFMT=0THEN75 

45 QM=H :G0SUB46 : VX< I , J>=-38000 JG0T027 

46 1 1 = 1 :JJ=J:P0KE991,QM:F0RIN=-1T01 |F0RJN=-1T01 : IFIN=0ANDJN=8THENHEXT JN 

47 FORKN=iT04;I = II+KN*IN:J=JJ+KN*JN!lFK10RI>14THENKN=4:GOT067 

48 IFJ<10RJ>14THENKN=4sG0T067 

49 CL=J+0+2 sR=I+4 iL=S+RL*';R-l 3+CL :P=PEE(«L.") ! IFP=C0RP=HTHEN67 

50 POKEL,P+123;VJ:';i,j:>=0:LH=INT'".L/256> :LL=L-LH*256:POKE962,LL:P0KE963,LH 

51 POKEL,P:SVS<ML> :ZP=P£EK<973:> : IFZP=0THEN55 

52 F0RV=1T0ZP:NC=PEEKC974+V> :NH=PEEK<932+V:> jF-FH |IFNH=0THENNH=NC :F=FC 

53 VSi < I, J 5 -V5i<: I, J> + 1 NT <F*NH*NhD :NEXTV :NE=PEEK<993 J 

54 IFNEO0THENV«< I , J )=V/i( I , J :>-NE*NE 

55 NH=0:IFPEEK<992)=0THEN67 

56 FORV=1TO4:Q=0:Z=O<V:>:T=PEEK':L+Zl :IFTOPEEK<L-Z?THEN66 

57 IFT=H0RT=CTHEN59 

se 00T066 (continued) 
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Listing 1 (continued) 

59 Z=D < V > : G0SUB9 1 1 1 FPEEK < L >OTTHENQ=Q- 1 

60 I FQ>4THENQ=0 : G0T066 

61 IFGK4THEN64 

62 IFT=CTHEHQ=2 

63 Q=Q+11 :G0T066 

64 IF<N1=HORN1=OANON1=N2THENQ=0 

65 I FQ=3flND < N 1 OHANON 1 OC > AND < N2OHAN0N2OC ■) THENQ=8 

66 NH=NH+Q:NEXTV:IFNH>0THENW;<I,J> = INT<FH*NH*NH.'>+VX<I,J) 

67 NEXTKN;NEXTJH:NEXTIN:I=II l J=JJ iRETURN 

68 N3=0 : FORV= 1 T04 : Z=D < V ) : G0SUB9 1 

69 I FQ=3THEN I FN 1 OC ANON 1 <>32AN0N2OCAN0N2O32THENN3=N3+ 1 

70 IFQ=5THENU=T:G0T072 

71 NEXTV 

72 I FQ=5ANDU=HTHENFH=FH* 1 . 2 

73 IFZZTHENN3=0 

74 RETURN 

75 PRINTMV*"MSTALEMATE" :G0T083 

76 IFNP*="C"ANDW=CTHENM=M+1 

77 IFW=HTHENPRINTMV*"»f , OU WON IN"M" MOVES" 

78 IFW=CTHENPRINTMV*"BI WON IN"M" MOVES" 

79 IFM<10THENPRINT"GOOD GAME!" 

80 IFM>9ANDM<20THENPRINT"CLOSE GAME!" 

81 I FM> 1 9ANOMO0THENPR INT" GREAT GAME ! " 
32 I FM>29THENPR I NT "FANTASTIC GAME!" 

S3 PRINT"WANT TO PLAV AGAIN" ; :G0SUB85 : IFLEFT*< IN*, 1 >="V"THEN10 

84 END 

85 ZC.= 1 :ZT=0 

86 GETZ*lIFZ*<>""THEN89 

87 IFTI>=ZTTHENPRINTMID*<"? " ,ZC, 1 > ; "||" ; :ZT=TI+30 :ZC.=3-ZC 

88 G0T086 

89 IFZ*OCHR*<13>THENIN*=Z* 

90 PRINT"? "; IN* ;: RETURN 

91 Q=l lLN=L+Z 

92 IFPEEK<LN>=TTHENQ=Q+1 :LN=LN+Z :G0T092 

93 N1=PEEK<LN> :LN=L-Z 

94 IFPEEK<LN.')=TTHENQ=Q+1 |LN=LN-Z :G0T094 

95 N2=PEEK'.LN> (RETURN 

96 XJ=G+0+2lXI=N+4:L=S+RL*<XI-l>+XJ:P=PEEK'<L> :FS=T : IFFS=PTHENFS=128+FS 

97 P0KEL,FS:FZ=P:ZT=TI+9 

98 POKEE , : OX=0 : DV=0 :FB=0 : GOSUB 112:1 FDXORDVQRFBTHEN 101 

99 IFTKZTTHEN98 

100 Z=FZ:FZ=PEEK<L> :POKEL,Z :ZT=TI+9 :G0T098 

101 IFFBTHEH109 

102 P0KEL,P:N=N+DV:G=G+DX:P0KEE,135:U=TI 

103 IFTKU+9THEN103 

104 IFN>14THENN=1 

105 IFN<C1THENN=14 

106 IFG>14THENG=1 

107 IFG<1THENG=14 

108 GOT096 

189 IFP=C0RP=HTHEN98 

110 G0SUB68:IFN3MTHEN98 

1 1 1 POKEL , T : POKEL+ A , 8 : POKE V , I POKEE , : 1 =N : J=G : RETURN 

1 1 2 POKEDD , 1 27 : B=PEEK < P2 > AND 1 23 : J0=- < B=0 > : POKEOO , 255 : B=PEEK < P 1 > 

113 J2=-<<BAND16>=0.') : J3=-< <BANO4>=0.') :FB=-< <BANO32.')=0> I Jl=-< <BAND8.')=0> 

114 IFJ0THENDX=1 

115 IFJ1THEN0V=1 

116 IFJ2THENDX=-1 

117 IFJ3THEN0V=-1 

118 RETURN 
READY. 



grid. By comparison, the first version of 
GOMOKU I wrote was entirely in 
BASIC and took from three to six 
minutes between moves — and it did 
not play half as well as the current ver- 
sion. VIC/PET GOMOKU should be 
capable of holding its own against even 
very good human players — especially 
if the computer moves first. 

VIC/PET GOMOKU has three 
styles of play: cautious, balanced, and 
aggressive. These styles refer to how 
much the computer will weigh defen- 
sive vs. offensive moves in its evalua- 
tion of the merits of its next move. If 
you select a balanced style, both of- 
fense and defense have equal weights. 
You will find the computer will win 
more games when it is playing aggres- 
sively. However, when you select the 
cautious style for the computer, you 
may not be able to win often because 
many games will end up in stalemate; 
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the computer will unrelentlessly block 
your chances for any kind of a winning 
pattern. When the computer loses a 
game, it will automatically play a more 
aggressive game the next time. 

The VIC Version 

The VIC version of GOMOKU 
needs at least 3K of additional memory. 
This can be obtained by using any of 
the standard VIC Super Expander, 3K, 
8K, or 16K memory cartridges. 

The program is written in two parts. 
Listing 1, the main part, is written in 
BASIC and should be keyed-in exactly 
as shown in the listing (i.e., with no 
unnecessary spaces to conserve mem- 
ory). Listing 2, a hex-dump of the 
machine-language routines, shows the 
machine code being located from $1300 
to $14AB. These locations assume you 
are using either the Super Expander or 
the 3K memory cartridges, which cause 
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the start of BASIC to be located at 
$0400 (just like the PET). If you are 
using either the 8K or 16K memory ex- 
panders, this machine code should be 
located from $2100 to $22AB because 
the start of BASIC is relocated to $1200 
by the VIC's operating system. When 
you use a monitor to enter and save the 
code in the hex listing, there is no need 
to worry about relocating the two-byte 
addresses since lines 4-6 of the BASIC 
program automatically adjust them to 
correspond to the memory configura- 
tion of your VIC. 

To create a working copy of GO- 
MOKU for the VIC, first load the 
BASIC portion (listing 1). Then load 
the machine-language code you had 
previously saved with the monitor by 



Listing 2 
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using the command LOAD "name", 
1,1. The l's at the end of the LOAD 
will load the code at its absolute loca- 
tion (i.e., $1300-$14AB or $2100- 
$22AB), rather than automatically be- 
ing relocated to the start of BASIC. 
After both parts have been loaded, issue 
the command SAVE "VIC GOMOKU" 
and you will save a copy that combines 
both parts and can be used independently 
of whatever memory configuration is 
operating in the VIC. 

The VIC version of GOMOKU uses 
the joystick to indicate your move. 
Once you have moved the cursor to your 
desired location, just hit the fire-button. 

The PET Version 

The machine-language code in the 
hex-dump (listing 2) will work without 
any changes in the PET. However, 
several lines of the BASIC program 
must be changed. Specifically, listing 3 
contains all the lines that must be 
changed in listing 1 to get GOMOKU to 
work on the PET. In addition to these 
differences, lines 7, 116, 117, and 118 
of listing 1 should not be included in 
the PET version. The BASIC instruc- 
tions should be typed without any 
unnecessary spaces to assure that the 
BASIC part does not run into the 



:E=12*4896 :V=E : 1=1=3*4096 



Listing 3 

1 RL=40: 5=32767 

2 FH=RHD','-TI) 

3 F0RI = 1T08:RERDX:P0KE951 + I,X:NEXTI :DPITfll ,39, 40.. 41 , 129, 167, 168, 169 :FH=1Q 

4 ML=PEEK<40)+256*PEEK<41)+3839:DIMD<8),VK',14,14),DR<9),DC<9) 

5 F0RI = lTO9:REHDDR<I?,DC':i.-) :NEXTI 

6 DHTR1,- 1,1, 8,1, 1,0, -1,8, 0,0, 1,-1, -1,-1, 0,-1,1 

9 FORI = lT08:REHDO<i:> :NEXT :DHTfl-40, -39, 1 ,41 ,40,39,-1 ,-41 

10 H=S1 iC=87iNP*="C":M=0:W=0sPRINT"3 31ICRO GOMOKU" : I N*="H" 

14 IN*="H" : PR I NT "WHITE OR BLACK " ; :G0SUB85 : PR I NT : IFIN*="B"THENH=87 :C=S1 

112 GETF*:IFF*=" "THENRETURN 

113 IFF*=CHR*<13)THENFB=1 :RETURN 

114 I FF*< " 1 " ORF*> " 9 " THENRETURN 

115 QQ=flSC<F*)-4S:DX=DC'C0ia? :OV=DR<QQ) :RETURN 



machine-code part. If you have an 
80-column screen, change RL in line 1 
to 80, the DATA values in line 3 to 1, 
79, 80, 81, 129, 207, 208, 209, and the 
DATA values in line 9 to - 80, - 79, 1, 
81, 80, 79, -1, -81. 

To create a working PET copy of 
GOMOKU, first load the BASIC part, 
then load the machine code previously 
saved by the monitor (it will always be 
located from $1300 to $14AB in the 
PET version), then issue the command 
SAVE "PET GOMOKU" to save a copy 
that combines both parts. 

The PET version uses the numeric 
keyboard to indicate your move. Once 
the cursor is where you wish to move, 
just hit RETURN to enter the move. 
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SIGNALMAN MARK I DIRECT CONNECT 
MODEM - $89.50 

Standard 300-baud, full duplex, 
answer/originate. Powered by 
long lasting 9-volt battery (not 
included). Cable and RS-232 
connector included. 

EPR0MS - HIGH QUALITY. NOT JUNK 

Use with PET, APPLE, ATARI, SYM, AIM, etc. 450 ns. $6.50 
for 2716, $12.50 for 2532. We sell EPROM programmers 
for PET and ATARI 

5% INCH SOFT 
SECTORED DISKEHES 

Highest quality. We use them on 
our PETs, APPLEs, ATARIs, and other 
computers. $22.50/10 or $44.50120 

NEW! C. IT0H STARWRITER F 10 
DAISY WHEEL PRINTER 

Letter quality, flawless copy at 40 char/sec. Bidirectional 
printing, 15-inch carriage, uses standard Diablo ribbons 
and print wheels. x &£f s fffff 

PARALLEL - $1495, RS-232 - $J68B;7RACT0RS - $210 




MAE SOFTWARE DEVELOPMENT SYSTEM 
FOR PET. APPLE, ATARI 

'The Compatible Assembler" 

• Professional system for development of Machine Lan- 
guage Programs. 31 Characters per label. 

• Macro Assembler/Text Editor for Disk-based systems. 

• Includes Word Processor for preparation of Manuals, etc. 
•Standard Mnemonics - Ex.: LDA (LABEU, Y 

• Conditional Assembly, Interactive Assembly. 

• Editor has string search/search and replace, auto line 
numbering, move, copy, delete, uc/lc capability. 

• Relocating Loader to relocate object modules. 

• Designed with Human Factors Considerations. 

$169.95 

FLASH!! EHS Management has decided to allow $50 00 credit 
to ASM/TED owners who want to upgrade to MAE. To gel this 
credit, return ASM/TED manual with order for MAE 

ATARI AND PET 
EPROM PROGRAMMER 



Programs 2716 and 2532 
EPROMs. Includes hardware 
and software. PET = $75.00- 
ATARI (includes sophisticated 
machine language monitor) = 
$119.95 
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PET BASIC SCROLL PROGRAM 

Scroll thru basic program using Cursor up/down keys. 
Specify computer. $6.00 on cassette, $9.00 on disk. 

Flip 'N' File diskette storage case (50-61) disks )- 
$21.95 

Memory Test for Apple on Disk = $9.95, on Tape 
= $6.95 

System Saver for Apple - Fan, Surge Protection, 2 
extra outlets, Apple power cord = $75.00 

BMC Green Screen Video Monitor. 

12 inch CRT, sharp, crisp 40 or 80 column display. 
= $90.00 

DC Hayes Smart Modem = $235.00, Micro Modem 
II = $289.00, Chronograph = $225.00 

C. Itoh Prowriter Printer. Better than MX80. We use 
constantly with our Apple and PET. Can be used on 
I8M, Atari, TRS-80, etc. 120 cps, friction and tractor 
feeds, hi resolution dot graphics, nice looking, high 
quality construction. Parallel - $499.00, with IEEE 
interface for commodore - $599.00, RS232 - $660.00 



3239 Linda Dr. 
Winston-Salem, N.C. 27106 
(919)924-2889 (919)748-8446 
Send for free catalog! 
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Number Shuffle on the Atari 



by Frank Roberts 



A computer version of the 
popular game Magic Square. 

Number Shuffle 

requires: 

Atari 400 or 800, 8K 

In the days of yore, before Rubik's 
Cube, there existed a two-dimensional 
puzzle called Magic Square. It was 
played by rearranging a random set of 
numbers within a four-by-four matrix 
until the numbers were in numerical 
ascending or descending order. 

This program is a computer simula- 
tion of that puzzle, and is built around 
a six-by-six matrix. All positions sur- 
rounding the central matrix are set to a 
value of - 1 and used only for com- 
parison and validation of moves. One 
position of the four-by-four center 
matrix, set to zero, is graphically 
represented by a blank space. Only the 
numbers horizontally or vertically adja- 
cent to the space may be moved into 
that vacant space. 

The game begins after the numbers 
in the NBR array are shuffled 100 times 
(lines 210-250] and set into the play- 
field array, BRD (300-370). Once the 
board is displayed on the screen, the 
user is prompted for a choice of num- 
bers to move into the empty space. If 
the number is valid, the number and the 
space are switched. The X and Y arrays 
hold the screen coordinates for each 
number in the central matrix. The 
switch is made in lines 530-560 and 
subroutine 20-25. Lines 600-650 check 
the board after every switch. If all 
numbers are in proper ascending order, 
the program terminates with a con- 
gratulations and some fanfare. It will 
also display the total number of moves 
made to solve the puzzle. To check for 
a solution in descending order, just 
change line 610 to FOR J = 29 TO 8. 

Note: If you wish to see 
display of finish without working 
through the whole puzzle, just type 
"GOTO 700." 



************************************* 

NUMBER SHUFFLE 



Frank Roberts 

3736 Ferndale Drive 

Ft. Uayne, IN 4615 

************************************* 



>> :X(17> = 
>) :X<23) = 
>> :X<29>= 



X( 11 ) 
X( 1 1 ) 
X( 11 ) 



REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 

GOTO 3« 

BRD<P)=M0VE:P0SITI0N X(P),Y(P):IF BRD(P)<1« THEN PRINT H6- 

PRINT H6;BRDCP) :RETURN 

DIM BRD(36),NBR<16>,X(36),Y(36),R«(10) 

X(8)=3:x<9)=6:x(ie)=9:x(ll)=i2 

X!14)=X(8):X(15)=X<9):X<16>=X(1« 

X(ze)=x(8):xczi)=x<?):X(22)=x(ie 

X<26)=X<B>:X(Z7)=X<?):X(Z8)=X(ie 

REM 

Y<8)=5:Y<14)=8:Y<2e)=ll:Y<26>=14 

Y<9)=Y<8>:Y<15>=Y<14):Y(21>=Y(20):Y<27>=Y<26> 

Y(10)=Y(8):Y(16)=Y(14>:Y<22)=Y<2«):Y<Z8)=Y<26> 

Y<H>=Y<8>:YC17>=Y<14):Y<Z3)=Y<Z«>:Y<Z9)=Y(26> 

REM 

GRAPHICS ZIPOSITION Z,4:PRINT H6;'NUMBER SHUFFLE' 

FOR MUSIC=50B TO STEP -1.5:S0UND 8 , « , 8 , MUSIC : P0 KE 7«8 , I NT < RND < « ) *Z22 

:NEXT MUSIC:S0UND «,«,«,« 

PRINT ">D0 YOU WANT INSTRUCTIONS ';:INPUT R*:IF I»(1,1]()T THEN 108 
GRAPHICS «:P0SITI0N 2,7 
PRINT 'NUMBER SHUFFLE IS A SOLITAIRE GAME IN UHICH 15 NUMBERS ARE 

SCRAMBLED U ITHIN" 

PRINT "A 4 X 4 SQUARE. THE NUMBERS ARE THEN MOVED ONE AT A TIME INTO 

AN EMPTY 1 

PRINT "SQUARE IN AN ATTEMPT TO ARRANGE THE 
THE ONLY- 
PRINT 'VALID MOVE IS ONE OF THE FOUR NUMBERS- 
PRINT 'ADJACENT TO THE EMPTY SPACE IN THE SQUARE.' 
PRINT :PRIN.T -WHEN YOU ARE READY, PRESS RETURN ■;: I NPUT 
REM ***** SET UP BOARD ***** 

i GRAPHICS l:P0SITI0N 4,5:PRINT »6 ;■ STANDBY .... ' 

i POSITION 3,7:PRINT «6;-I'M MIXING UP' 

i POSITION 5,9:PRINT H6;'THE BOARD 1 

' REM ***** CHOOSE SET OF RANDOM NUMBERS ***** 

i FOR J-H TO 15:NBR( J+l )=J:NEXT J 

1 REM ***** NOW SHUFFLE NUMBERS ***** 

for j=i to iee 



NUMBERS IN NUMERICAL ORDER. 



B< 1 THEN B=A+1 
B<1 THEN B = A + 4 
B>16 THEN B=A-1 
B> 16 THEN B = A-4 



» A=INT(RND<« ) *15 > +1 
B=INT(RND<«)*4> 
IF B = « THEN B = A-1MF 
IF B=l THEN B=A-4:IF 

3 IF B=Z THEN B=A+1:IF 

4 IF B=3 THEN B=A+4:IF 
TEMP=NBR<A):NBR(A)=NBR<B):NBR(B)=TEMP 
NEXT J 

REM ***** NOW SET UP BOARD ***** 
FOR J=l TO 36:BRD(J)=-1 :NEXT J 

c=e 

FOR J=8 TO Z9 

IF J=1Z OR J=13 OR J=18 OR J=19 OR J=Z4 OR J=25 THEN 378 

C = C + 1 

BRD(J)=NBR(C) 

IF BRD<J>=» THEN P=J 

NEXT J 

REM ***** DISPLAY BOARD ***** 

GRAPHICS l:P0KE 752 , 1 : C =8 : POS I T ION 6,4 

FOR R0W=1 TO 4 

PRINT »6:PRINT »6; ' ■ ; 

FOR J=C TO C+3 

IF BRD(J)=« THEN PRINT *(,;' 'jlGOTO 468 

IF BRDIJXie THEN PRINT »6;' "; 

PRINT «6;BRD( J) ; " ' ; 

NEXT J 

C = C*6 

PRINT K6IPRINT »6 

NEXT ROW 



(continued) 
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Number Shuffle (continued) 



499 REM ***** GET MOVE NUMBER AND PROCESS ***** 

589 POP :TRY=TRY+1 

585 PRINT ■ '."POKE 654 , PEE K ( 656 > - 1 

5ie PRINT "ENTER NUMBER TG MOVE: "; 

529 INPUT MOVE; 

538 IF BRD<P-1 )=MOVE THEN BRD ( P- 1 ) =0 : GO SUB 2« : P = p-1 : POS ITI ON X ( P ) , Y ( p ) 

IPRINT «6; ■ '-.GOTO 608 
549 IF BRD( P-6)=MOVE THEN BRD ! P -6 ) =« : GOSUB Z9 : p = p -6 : POS I T I ON X < p > , Y < P ) 

:PRINT N6; ' ':GOTO 699 
559 IF BRD( P+l )=MOVE THEN BRD ( P-H ) = 9 : GOSUB 29 : P = P+ 1 : POS IT I ON X ( P ) , Y ( P ). 

:PRINT H6; " ":GOTO 699 
569 IF EiRB(P + 6)=M0VE THEN BRD ( P + 6 ) =0 : GOSUB 29 : P = P +4 : POS IT I ON X(P),Y(P> 

IPRINT tt 6 - ' ":GOTO 609 
579 PRINT 'MI-LEGAL MOVE":G0TO 518 

599 REM ***** CHECK BORAD FOR UIN ***** 

600 C=0:IF BRD<29)<>« THEN POKE 656 , PEEK ( 656 )- 1 : GOTO 509 
619 FOR J=8 TO 28 

6?0 IF J=12 OR J=13 OR J^18 OR J=19 OR J=Z4 OR J=25 THEN 650 

639 C=C+1 

631 PRINT C ,BRD( J) 

649 IF BRD(J)=C THEN 659 

442 POKE 656,PEEK<656)-1 

644 GOTO 500 

459 NEXT J 

69? REM ***** CONGRATULATE WITH FANFARE ***** 

709 GRAPHICS UPOSITION 2,6:PRINT #6 ;' CONGRATULATIONS ■ 

710 POSITION 3,8:PRINT KAi'YOU DID IT IN" 
720 POSITION 5,10:PRINT »6;TRY;' MOVES" 
729 REM ***** PLAY SONG ***** 

899 FOR J=l TO 6 

819 READ S,S2,I 

829 SOUND 9,S, 19,8:S0UND 1 , S- 1 , 10 , 4 : 30UN D 2 , S2 , 10 , 4 : SOUND 3,52-1,10,2 

839 FOR K=l TO I:NEXT K 

840 NEXT J 

850 SOUND 0,0,9,0:SOUND 1 , , ,«: SOUND 2, , , : SOUND 3,0,0,0 

909 DATA 162, 81, 15 ,121, 60, 20, 96, 47, 25, 81, 40, 70, 96,47, 20, 81, 40, 100 



JMCftO 



Letterbox 



Two Many Lines 

Kerry Louiash, author of "Sur- 
change for OSI" in the August issue, 
noticed an error in his listing. On page 
77, there are two line numbers for 
1100. Type in only one. 



Move the Decimal 

An error in the September Software 
Catalog last month could have bank- 
rupted MicroSoftware International, 
Inc. Computer Business Software was 
wrongly listed as $64.70. It should have 
been $6470.00. Pardon our slip. 



VOICE I/O THAT WORKS! 



for the APPLE II and Commodore computers 



Voice I/O has come a long way from the 
barely intelligible computer speech of on- 
ly a few years ago. It is now possible to 
enter data or commands to your computer 
just by talking to it and the computer can 
talk back with clear, pleasant, human 
sounding voice. 

The COGNIVOX models VIO-1002 (for 
Commodore) and VIO-1003 (for the Apple 
II + ) are at the forefront of a new genera- 
tion of Voice I/O peripherals that are easy 
to use, offer excellent performance and 
are affordably priced. 

SOME SPECIFICATIONS 

COGNIVOX can be trained to recognize 
up to 32 words or phrases chosen by the 
user. To train COGNIVOX to recognize a 
new word, you simply repeat the word 
three times under the prompting of the 
system. 

COGNIVOX will also speak with a voca- 
bulary of 32 words or phrases chosen by 
the user. This vocabulary is independent 
ol the recognition vocabulary, so a dialog 
with the computer is possible. Memory re- 
quirements for voice response are approx- 
imately 700 bytes per word. 

For applications requiring more than 32 
words, you can have two or more vocabu- 
laries and switch back and forth between 
them. Vocabularies can also be stored on 
disk. 




t M jt A ■» 




HOW IT WORKS 

COGNIVOX uses a unique single-chip 
signal processor and an exclusive non-li- 
near pattern matching algorithm to do 
speech recognition. This gives reliable op- 
eration at low cost. In fact, the perfor- 
mance of COGNIVOX in speech recogni- 
tion is equal or better to units costing 
many times as much. 



For voice output, COGNIVOX digitizes 
and stores the voice of the user, using a 
data compression algorithm. This method 
offers four major advantages: First there 
are no restrictions to the words COGNI- 
VOX can say. If a human can say it, COG- 
NIVOX will say it too. Second, it is very 
easy to program your favorite words. Just 
say them in the microphone. Third, you 
have a choice of voices: male, female, child, 
foreign. Fourth and foremost, COGNIVOX 
sounds very, very good. Nothing in the 
market today can even come close to the 
quality of COGNIVOX speech output. You 
can verify this yourself by calling us and 
asking to hear a COGNIVOX demo over 
the phone. Hearing is believing. 

A COMPLETE SYSTEM 

COGNIVOX comes assembled and test- 
ed and it includes microphone, software, 
power supply, built in speaker/amplifier 
and extensive user manual. All you need 
to get COGNIVOX up and running is to 
plug it in and load one of the programs 
supplied. 



It is easy to write your own talking and 
listening programs too. A single state- 
ment in BASIC is all that you need to say 
or recognize a word. Full instructions on 
how to do it are given in the manual. 

COGNIVOX model VIO-1002 will work 
with all Commodore computers with at 
least 16k of RAM. Model VIO-1003 re- 
quires a 48k APPLE II + with 1 disk drive 
and DOS 3.3. 

ORDER YOUR COGNIVOX NOW 

Call us at (805) 685-1854 between 9am 
and 4pm PST and charge your COGNIVOX 
to your credit card or order COD. Or send 
us a check in the mail, specifying your 
computer. Price for efther model of COG- 
NIVOX is $295 plus$4 shipping in the U.S. 
(foreign add 10% we ship AIR MAIL). 

VOICETEK 

DeptS , P.O. Box 388 Goleta, CA 93116 

Also available few the AIM-65. 
Call or write for details. 



OSI Delete Modifications 



Claude Barron of Quebec, Canada, 
sent in this update. 

In the August issue of MICRO, Mor- 
ris and Morishita wrote a program for 
"Delete on the OSI." Here is a 
modification that will save you seven 
bytes in your program. 

In their program to get the code for 
the "OK", you go through the output 
to CRT routine, and then get back to 
BASIC in address $A319. Another way 
would simply get you back in BASIC 
through the warm start located at 
SA274. This routine will print the 
"OK". Here are the necessary changes 
in your BASIC program: 

18 N = 57: FORX = M TOM + N-1: 
READ J: POKE X, J: NEXT 

22 A = INT (M/256): B = M - 256*A: 
POKE M-6, A: POKE M-7, B 

42 DATA 144, 5, 32, 110, 2, 240, 219, 
76, 116, 162 

There is no need for a line 44. 

I would also like to point out a little 
mistake in the text. When you write 
that the code is relocatable with the ex- 
ception of the JSR at $026E, it should 
be $0266. 

JMCRO 
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II 



400 

16K $ 269 

32K $ 349 

48K $ 429 

410 Recorder $ 76.00 

810 Disc Drive $449.00 

822 Printer $269.00 ; 

825 Printer $589.00 

830 Modem $1 50.00 

820 Printer $259.00 

850 Interface $169.00 

CX40 Joystick $ 18.00 

CX853 16K RAM $ 77.95 



. HOT ATARI- 
Jk GAMES JK 

PAC-MAN $35.00 

Centipede $35.00 

Caverns of Mars $32.00 

Asteroids $29.00 

Missile Command $29.00 

Star Raiders $39.00 

Ghost Hunter. $24.00 

^jH RASTER %*SA 
^ BLASTER ^4 



DATASOFT 

Gamea for the Atari 

Pacilic Coast Highway $25.00 

Canyon Climber $25.00 

Tumble Bugs $25.00 

Shooting Arcarde $25.00 

Clows and Balloons $25.00 

Graphic Master $30.00 

Graphic Generator $13.00 

Micro Painter $25.00 

Text Wizard $89.00 

Spell Wizard $64.00 

Bishops Square $25.00 



VISICORP 

VtSBALC 

Apple II + $189.00 

Atari $189.00 

Commodore $189.00 

IBM $189.00 

For APPLE, IBM, FRANKUN 

Vlsidex $189.00 

Visifile $189.00 

Visiplot $159.00 

Visiterm $189.00 

VbitrenoVPIot $229.00 

Vei Schedule $229.00 

Desktop Plan $189.00 



800 — 48K 

$ 669 



Microtek 16K RAM $ 74.95 

Ramdisk (128K) $429.95 

Itec 48K Board $159.00 

Itec 32K $ 74.00 

One Year extended warranty $ 70.00 

481 Entertainer $ 69.00 

482 Educator $130.00 

483 Programmer $ 49.00 

484 Communicator $344.00 



CBS 

ROM CARTRIDGE GAMES 
FOR YOUR ATARI 

Krazy Shoot Out $32.00 

K-razy KrKters $32.00 

K-razy Antics $32.00 

K-star patrol $32.00 

STICK STAND e 

$g99 -4- 

ARCADE ACTION FROM 
YOUR ATARI JOYSTICK 




ON-LINE 

Jawbreaker $27.00 

Softporn $27.00 

Wizzard and Princess $29.00 

The Next Step $34.00 

Mission Asteroid $22.00 

Mouskattack $31.00 

SYNAPSE 

File Manager 800 $79.00 

Chicken $28.00 

Dodge Racer $26.00 

Synassembler $30.00 

Page 6 $19.00 

Shamus $26.00 

Protector $26.00 

Nautilus $26.00 

Slime $26.00 

Disk Manager $24.00 



TIMEX 



TIMEX SINCLAIR 1000 



LOWEST 

PRICE 

EVER 



$ 89 



99 



PEfiGOM 



Disk Drives for 
Atari Computers 

Single Drive S1 $649.00 

Add-on Drive A1 $349.00 

Dual Drive S2 $899.00 




//-SCI 



MICRO-SCI 

Disk Drives for 
Franklin & Apple II 




MODEMS 



Hayes 

Smart $: 

Chronograph $' 

Microdem II $.' 

Microdem 100 $: 

Novation Auto 

D Cat $■ 

Cat $' 

Anchor 

Mark I (RS-232) $ 

Mark II (Atari) $ 

Mark III (TI-99) $ 

Mark IV (CBWPET) $ 

Mark V (OSBORNE) $ 

Mark VI (IBM-PC) $ 

Mark VII (Auto Answer/Dial) $ 

9 Volt Power Supply $ 



MONITORS 



AMDEK 

300G $1 

Color I $; 

Color II $f 

Color III V 

BMC 

12" Green $ 

13" Color 1400 $! 

13" Color 1401 (Midres) K 



ZENITH 



ZVM121.. 



SHARP 



Sharp 1 3" Color TV... 



Maxell Disks 

MD I (Box of 10) $ 

MO II (Box of 10) $ 

MFD I (8") $ 

MFD II (8" Double Density) $ 

Syncom (Box of 10) $ 

Computer Covei 

Atari 400 $6.99 Commodore VIC-20.. $ 

Atari 800 $6.99 Commodore 8032 $' 

Atari 810 $6.99 Commodore 

8050/4040 $• 

COVERS CONTAIN ADVERTISING 



west 



8QQ- 648-33 1 1 



In Nevada 

CALL 

(702)588-5654 



P.O. Bo 
Sta 

NV. 



fT FRANKLIN 



$ § § 




64K Personal Computer 

Hardware, software and 
peripheral compatable with the 
Apple II and even has some fea- 
tures not found on the Apple. 



m 

HP«85 
s 1969 



HEWLETT 
PACKARD 



HP.125 $1969.00 

BP.85 16K Memory Module $ 169.00 

5V»" Dual Master Disc Drive $1799.00 

Hard Disk WRoppy $4349.00 

Hard Disk $3549.00 

"Sweet Lips" Plotter $1199.00 

80 Column Printer $ 649.00 

NEC 

COMPUTERS 

8001-A $749.00 

8031 $749.00 

8012 $549.00 

PRINTERS 

8023 $ 549.00 

7710/7730 $2399.00 

3510/3530 $1599.00 

MONITORS 

JB-1201 $179.00 

JC-1201 $349.00 

JC-1202 $899.00 



Televideo 
Terminals 





CBM 8032 

$ 999 



& 



PROFESSIONAL SOFTWARE 

Word Pro 5 + $319.00 

Word Pro 4 + $299.00 

Word Pro 3 + _ $199.00 

The Administrator $379.00 

InfoPro Plus. $219.00 

Power $ 79.00 



Commodore 

Business Machines 

CBM 64 l2ai-J 

4032 $ 749.00 

8096 Upgrade Kit $ 369.00 

Super Pet $1599.00 

2031 $ 369.00 

8250 Double Sided Disk Drive $1699.00 

D9060 5 Megabyte Hard disk $2399.00 

D9090 7.5 Megabyte Hard disk $2699.00 

805O $1299.00 

4040 $ 969.00 

8300 (Letter Quality) $1549.00 

8023 $ 599.00 

4022 $ 399.00 

Pet to IEEE Cable $ 37.00 

IEEE to IEEE CAble $ 46.00 

Tractor Feed tor 8300 $ 240.00 

New Z-Ram, Adds CP/M and 64K Ram $ 549.00 




thill HEWLETT 
mL'HM PACKARD 

HP 41 CV 
CALCULATOR 

*209 

HP 41C $149.00 

HP 10C $ 69.00 

HP 11C $ 79.00 

HP 12C $114.00 

NEW 115C $119.00 

NEW 16C $125.00 

HPIL PERIPHERALS IN STOCK! 





SHARP 



PC-1500 

POCKET COMPUTER 



ALSO AVAILABLE: 

Printer w/cassette interface 

cassette tape recorder 

and 4K and 6K RAM EXTENSIONS 



In-stock items shipped same day you 
call. No risk, no deposit on C.O.D. or- 
ders. Pre-paid orders receive free ship- 
ping within the continental United States 
with no waiting period for certified checks 
or money orders. Add 3% (minimum 
$3.00) shipping and handling on all 
C.O.D. and Credit Card orders. NV and 
PA residents add sales tax. All items 
subject to availability and price change. 
NOTE: We stock manufacturer's and 
third party software for most all com- 
puters on the market! Call today for our 
new catalog. 




VIC 20 '— ~ 

*179 

VIC 1530 Commodore Datassette $ 69.00 

VIC 1540 Disk Drive $ 339.00 

VIC 1541 (64 Disk Drive) CALL 

VIC 1515 VIC Graphic Printer $339.00 

VIC 1210 3K Memory Expander $ 32.00 

VIC 1110 8K Memory Expander $ 53.00 

16K VIC Expansion $ 94.00 

VIC 1011 RS232C Terminal Interface $ 43.00 

VIC 1112VIC IEEE-488 Interface $ 86.00 

VIC 1211 VIC 20 Super Expander $ 53.00 

VIC Mother Board $ 99.00 



PRINTERS 

Smith-Corona 



TP-1 

$ 599 




Call for price and information on the new 
"intelligent" letter quality printer. 

c. rroH (tec) 

Starwriter (F10-40CPS) $1399.00 

Printmaster (F10-55CPS) $1749.00 

Prowrfter 80 Col (P) $ 499.00 

Prowriter SO Col (S) $ 629.00 

Prowriter 2 (132 Col) $ 799.00 

OKIOATA 

82*- $ 469.00 

83A. $ 689.00 

MP** $1099.00 

84 Serial $1249.00 

— ALSO- 

TaJtey 8024-L $1629.00 

IDS Prism CALL 



477 E. 
THIRD ST. 
Willlamsport 
PA 17701 



A DDITIO NA L MAN UFACTURER'S DISCOUNTS AVAIUVBLETOQUALIREOEDUCATIOIW 

8QQ-233-8950 




IN PA 

CALL 

(717)327 9575 



GAMES FEATUREI 



Sensible Use of Apple 
Game Paddles 



by Harry L. Pruetz 



Some programming suggestions 
to improve the validity of game- 
paddle inputs. 



Paddle Use 

requires: 

Apple computer with either 
Integer or Applesoft BASIC 
and the Apple game paddles 

When using Apple II game paddles, 
there are both hardware and software 
problems involved. With some knowl- 
edge of inherent limitations, the pad- 
dles can add to the enjoyment of com- 
puter games, both while designing a 
game and playing it. 

My Apple II came with two paddles 
hooked up to the game I/O connector. 
The paddles were actually rotating 
potentiometers, rather than the 
joystick-type paddles available. Unlike 
two-player games, games designed for 
one player using both paddles for x-y 
control would be better played with a 
real joystick controlling both x and y 
coordinate movements. 

The most obvious limitation on both 
game paddles is the 300-degree physical 
limit on control knob movement. Nu- 
merical values possible from a paddle 
range from at the complete counter- 
clockwise position, up to 255 at the 
complete clockwise position. How- 
ever, these values are available for only 
about a 150-degree rotation of the knob. 

The values read from BASIC using 
the PDL function may be expressed as a 
function of the angle of the paddle knob 
as follows: 



Angle 


Value 


0-29 


— 


30-65 





66-101 


0-63 


102-137 


64-127 


138-173 


128-191 


174-209 


192-255 


210-329 


255 


330-359 


— 



more than half of a degree! Labeling the 
paddles and marking the actual ranges 
are quite helpful for many games. 

The paddle cable that plugs into the 
game I/O connector is a source of prob- 
lems. Each time the paddles are discon- 
nected, cable pins may get bent when 
reconnecting the paddles. The pins 
may be bent back into shape and the 
electrical connection will still be 
sound. However, a simple program to 
sample and display paddle values should 
be run occasionally to make sure the 
paddles are functioning correctly. 

A monitor routine measures a pad- 
dle value by delaying 12 microseconds 
for each unit value measured after the 
paddle is triggered. Thus a value of 255 
takes three milliseconds to measure. 
Times of one to three milliseconds for 
each PDL call are not excessive for In- 
teger or Applesoft BASIC. There are 
usually many other statements exe- 
cuted between PDL calls. Compiled 



BASIC or faster computer languages 
may still use the paddles for game input 
without noticeable effect from the slow 
timing speed. It is usually the machine- 
language implementations of sophisti- 
cated, fast-action games that avoid 
using paddles. 

The program listed is a RAM Apple- 
soft BASIC program to test and demon- 
strate some software techniques useful 
with game paddles. 

Lines 100 through 195 merely sam- 
ple paddle and print a value if it is dif- 
ferent from the previous sample. Line 
110 exits the sampling loop when any 
key is pushed. The paddle may be set to 
any value greater than and less than 
255, and left untouched for a while. 
Because of the sensitivity of the pot and 
the monitor routine which determines 
the value PDL(0), the value often skips 
back and forth between two consecu- 
tive numbers. This causes errors in 
some games that are not the player's 



The value read from a paddle may change 
by 1 when the knob is moved slightly 



Listing 1 


ifj RF*^ *********************** 


15 rem * paddle: use oemos 


20 RFM * 


25 RFM * RY 'IARRY L. PRUET7; 


30 REM *********************** 


35 DIM XC%(128),YC%(128) 


40 DEF FN X(D) = 4 * INT ( 1 + INT ( PDL (0) * 68) / 255 ) 


45 DEF FN.Y(D) = 2 * INT (2 + INT ( PDL (I) * 12) / 255) 


47 OTTO 95 


50 REM *** PDL(0) CALC *** 


55 D = ( PDL (0) - 4 * XP) / 4:XP = XP + SGN (D) * INT ( ABS (D)):X = 1 


1 + 4 * XP: RETURN 


60 REM *** PDL(l) CALC *** 


65 D = (255 - PDL (1) - 3 * YP) / 3:YP = YP + SGN (D) * INT ( ABS (D)) 


:Y = 10 + 2 * YP: RETURN 


70 REM *** FRAC PDL(O) CALC *** 


75 F = 255 / 45:D - ( PDL (0) - F * XP) / F:XP = XP + SGN (D) * TNT ( ABS 


(D)):X = 6 * XP: RETURN 


80 REM *** FRAC PDL(l) CALC *** 


85 F = 255 / 45:D = (255 - PDL (1) - F * YP) / F:YP = YP + SGN (D) * INT 


( ABS (D)):Y = 4 * YP: RETURN 


95 POKE - 16368,0: '10ME 


100 REM 


101 REM *********************** 


102 REM * PADDLE SAMPLING 


103 REM *********************** 


104 REM 


105 VP = PDL (0) 


110 IF PEEK ( - 16334) > 127 TIEN 195 


115 VC =» PDL (0) 


120 IF VC < > VP THEN PRINT VC;" ": 


125 VP = VC 


130 GOTO 110 (continued) 
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Listing 1 (continued) 

195 POKE - 16368,0: HOME 

200 Rat 

201 RUM *****************' 

202 REM 

203 RBt 

204 REM 

205 VP = 
210 IF 
215 VC = 
220 IF VC 
225 VP = VC 
230 GOTO 210 

POKE - 16368,0: HOME 
REM 



PDL (1) 
PEEK ( - 16334) > 127 THEN 295 
INT ( INT ( PDL (1) + VP) / 2) 
• VP TIEN PRINT VC ; " " ; 



295 

300 

301 

302 

303 

304 

305 PC 

310 X = 

315 Y ■■ 

320 

325 

330 

335 



REM 
REM 
REM 
REM 



SMOOTH FADING TRAIL 



1:NP = 128 

FN X(0) 

FN Y(l) 

I = 1 TO 128:XC%(I) 



X:YC%(I) = Y: NEXT I 



FOR 

HGR2 

IF PEEK ( -16334) > 127 THEN 395 

HCOLOR= 0: HPLOT X - 3,Y - 3 TO X + 

3,Y - 3 
340 HPLOT XC%(PC),YC%(PC) 
345 HCOLOR= 3: HPLOT X,Y 
350 XC%(PC) = X:YC%(PC) = Y 
355 PC = PC + 1: IF PC > NP THEN PC = 1 
360 X = INT ( INT (X + FN X(0)) / 2) 
365 Y = INT ( INT (Y + FN Y(U) / 
370 HPLOT X - 3,Y - 3 TO X + 3,Y + 
375 GOTO 330 
395 POKE - 16368,0: HOME 

400 REM 

401 REM *********************** 

402 REM * DISCRETE FADING TRAIL 

403 REM *********************** 

404 REM 

405 PC = 1:NP = 128-.XP = 0:Y° = 
410 GOSUB 50 

415 GOSUB 60 

43? R^ih 1 = * TO 128:XC * (I ) = X:YC%(I) = Y: NEXT I 



3,Y + 3: HPLOT X - 3,Y + 3 TO X + 



2) 

3: HPLOT X - 3,Y + 3 TO X + 3,Y - 3 



> 127 THEN 495 
3,Y - 3 TO X + 



3,Y + 3: HPLOT X - 3,Y + 3 TO X + 



430 IF PEEK ( - 16384) 

435 HCOLOR= 0: HPLOT X - 

3,Y - 3 

440 HPLOT XC%(PC),YC%(PC) 

445 HCOLOR= 3: HPLOT X,Y 

450 XC%(PC) = X:YC%(PC) = Y 

455 PC = PC + 1 : IF PC > NP THEN PC = 1 

460 GOSUB 50 

465 GOSUB 60 

470 HPLOT X - 3,Y - 3 TO X + 3,Y + 3: HPLOT X - 3,Y + 3 TO X + 3,Y - 3 

475 GOTO 430 

495 POKE - 16369,0: TEXT : HOME 

500 REM 

501 REM *********************** 

502 REM * FRACTIONAL PADDLE INC 

503 REM *********************** 

504 REM 

505 XP = 0:YP = 0: GOSUB 70: GOSUB 80:XC = X:YC = Y 
510 HGR2 : HCOLOR= 2:SW = 

515 FOR I = TO 275 STEP 2 

520 HPLOT 1,0 TO 1,183 

525 NEXT I 

530 HCOLOR= 1: FOR I=X+lTOX + 5 STEP 2: HPLOT I,Y TO I,Y + 3: NEXT 

535 IF PEEK ( - 16334) > 127 THEN 595 

540 GOSUB 70: GOSUB 80: IF X = XC AND Y = YC THEN 535 

545 HCOLOR= 0: FOR I = XC + 1 TO XC + 5 STEP 2: HPLOT I ,YC TO I,YC + 3: NEXT 

550 HCOLOR= 0: HPLOT XC + 2,YC + 1 TO X + 2,Y + 1 

555 HCOLOR= 1: FOR I=X+lTOX+5 STEP 2: HPLOT I ,Y TO I,Y + 3: NEXT 



560 XC = X:YC = Y: GOTO 535 
595 POKE - 16368,0: TEXT : 
999 END 



HOME 



fault. When the paddle cable is not 
properly plugged into the game I/O 
connector, values may vary even more, 
sometimes changing when the other 
paddle is moved. 

Lines 200 through 295 provide a 
more stable readout from paddle 1. A 
different paddle is used here to allow 
the program to be used for paddle 
checkout. When paddle 1 is not being 
moved, the averaged value VC changes 
only in very rare cases. A disadvantage 
of this averaging method is that the 
range is now only through 254. 
Averaging also slows down the rapidity 
with which VC may change. Paddle 
in the first case can be moved from one 
extreme to the other during only three 
or four samplings. Paddle 1 in this case 
takes about five more samplings for VC 
to catch up to the actual PDL(l) value. 
Line 215 could also be changed to give 
the previous value more weight with 
the penalty of slowing down the sam- 
pling even more. For example: 

215 VC = INT(INT(PDL(1) + 2*VP)/3) 

The INT functions required in Apple- 
soft BASIC make the above statement 
more inefficient than when using In- 
teger BASIC. 

Lines 300 through 395 use high- 
resolution graphics to demonstrate pad- 
dle sampling with averaging. XC% and 
YC% are arrays used as circular queues 
to allow display of the last 128 loca- 
tions of the 'X' shape. The functions at 
lines 40 and 45 convert a paddle value 
into x and y coordinates. Again, INT 
functions are required in Applesoft 
BASIC to insure integer arithmetic. 
The numbers in the defined functions 
are fairly easy to obtain by using the 
"slope-intercept form" for straight 
lines. From Analytic Geometry: 
f = a + mg, 

where g is the independent variable, 
m is the slope of the line, 
a is the value of f at g = 0, 
and f is the dependent variable. 

We want the paddles to determine 
screen location. Only multiples of 4 are 
used as x-coordinate locations, so the 
figure 'X' may be plotted at 4, 8, ..., and 
276 without x-3 or x + 3 causing "il- 
legal quantity" errors. Ignoring the 
multiplier of 4 for now, f should be 1 
when PDL(0)=0, and 69 when 
PDL(0) = 255. For f = a+m*PDL(0), 
a=l and m = (69- 1)/|255 -0), so that 
f = l+(PDL(0)*68)/255 and x = 4*f. 
Thus we get line 40, where D is an 
unused dummy variable: 

40 DEF FN X(D) = 4*INT(1 +INT 
(PDL(0)*68)/255) 
Multiples of 2 are used as 
y-coordinate locations, so the figure 'X' 
may be plotted at 4, 6, ..., and 188 
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without y-3 or y + 3 causing "illegal 
quantity" errors. Ignoring the multi- 
plier of 2 for now, f should be 2 when 
PDL(1)=0, and94whenPDL(l)= 255. 
For f = a + m*PDL(l), a = 2, m = 
(94-2)/(255-0), and y = 2*f. Thus 
we get line 45, where D is an unused 
dummy variable: 

45 DEF FN Y(D) = 2*INT(2 + INT 
(PDL(1)*92)/255) 

Line 320 initializes the circular 
queue. The actual loop is lines 330 
through 375. The loop performs the 
following steps: 

1. 
2 
3 
4 
5. 
6 



Erase current 'X'. 
Erase last point in trail. 
Plot current point in trail. 
Save point location in queue. 
Adjust queue pointer. 
Plot next 'X'. 



Lines 360 and 365 average the x and y 
values obtained from the paddle func- 
tions. The averaging has a smoothing 
effect on movements of the figure 'X' as 
it is moved around on the high- 
resolution grid. 

Lines 400 through 495 demonstrate 
a way of obtaining reliable paddle input 
without averaging. The routine at line 
50 is essentially the same as the one at 
line 60. However, the PDL(0) routine 
will be explained in detail. Let us con- 
sider the case of PDL(0] = and XP = 0. 



If PDL(0) is increased to 4, then XP 
becomes 1. If PDL(0) changes back to 3 
by itself, there will be no new XP 
because the difference is only 1. Now, 
when PDL(0) is increased to 7, there 
will still be no change in XP. If PDL(0) 
changes to 8 by itself and then back to 7 
again, the value XP = 2 will be calcu- 
lated and will remain in effect until 
PDL(0) is changed to 4 or 12. Thus the 
output of this routine is stable without 
averaging. I have chosen to call the 
method differencing. Note that merely 
dividing PDL(0) by 4 would not give 
stable results. The use of SGN(D)*INT 
(ABS(D)) is used since INT( - 1.1) gives 
- 2 instead of the - 1 desired. 

Note also that 255-PDL(l) is used in 
line 65 rather than just PDL(l). This 
gives the same "intuitive" coordinate 
change for the y-coordinate as paddle 
does for x-coordinate values. Thus, 
clockwise rotation of paddle 1 causes 
movement from the bottom to the top 
of the CRT display. 

The rest of this case is essentially 
the same as lines 300 through 395. 

Finally, we have a demonstration in 
lines 500 through 595 of fractional 
ranges of the paddles. The routines that 
sample the paddles are at lines 70 and 
80. The fraction involved is 255/45 or 
5.66667. This gives a high-resolution 
display of 46 by 46 cells six points wide 
and four points deep. Only 276 of 280 



horizontal, and 184 of 192 vertical 
high-resolution points are used. The 
white cursor is plotted and erased using 
the complimentary color between the 
background lines. Straight black lines 
are drawn between each position of the 
cursor as it is moved using the game 
paddles. 

Fractions much smaller than 
5.66667 may be used in the difference 
calculations for game paddles. I have 
used a fraction as small as 1.275 to get 
200 stable values from a game paddle. 
The values are not exactly "one-to-one" 
for a game paddle. For example, 
PDL(0) = 7 may give a calculated value 
of 5 or 6 depending on the previous 
value. However, the calculated values 
are stable and the game player cannot 
see the difference. 

If you have Integer or Applesoft 
BASIC programs that use game paddles 
and do not give satisfactory results, you 
may consider making a few simple 
changes similar to the given examples. 
Programs that use only a few keys may 
also be changed to use the game pad- 
dles. Above all, sit back and relax. An 
aching back caused by leaning over a 
keyboard is not really necessary. 

Contact the author at 2929 Clydedale, 
#376, Dallas, TX 75220. 

AMCftO 




MmWm 



Ver. 2 For your APPLE II/II+ 

The complete professional software system, that meets 
ALL provisions of the FORTH-79 Standard (adopted Oct. 
1980). Compare the many advanced features of FORTH- 
79 with the FORTH you are now using, or plan to buy! 

FEATURES OURS OTHERS 



79-Standard system gives source portability. YES 
Professionally written tutorial & user manual 200 PG. 

Screen editor with user-definable controls. YES 

Macro-assembler with local labels. YES 

Virtual memory. YES 

Both 13 & 16-sector format. YES 

Multiple disk drives. YES 

Double-number Standard & String extensions. YES 

Upper/lowercase keyboard input. YES 

LO-Res graphics. YES 

80 column display capability YES 

Z-80 CP/M Ver. 2.x & Northstar also available YES 

Affordable! $99.95 
Low cost enhancement option : 

Hi-Res turtle-graphics. YES 

Floating-point mathematics. YES 
Powerful package with own manual , 
50 functions in all, 
AM951 1 compatible. 

FORTH-79 V.2 (requires 48K & 1 disk drive) 
ENHANCEMENT PACKAGE FOR V.2 

Floating point & Hi-Res turtle-graphics 
COMBINATION PACKAGE 
(CA res. add 6% tax: COD accepted) 



$ 99.95 

$ 49.95 
$139.95 



MicroMotion 

12077 Wilshire Blvd. #.506 
L.A..CA 90025 (213)821^340 
Specify APPLE. CP/M or Northstar 
Dealer inquiries invited. 




SIG-FORTH V 1.0 



The only stand-alone Forth system 
for O.S.I, serial machines 



Features: 

Complete Forth source code 
Advanced Screen editor w/source 
6502 macro assembler w/source 
Double number and CASE extensions 
Vectored boot capability 
Several Utility Screens 
Complete glossary 



Dos Includes: 

Bi-Directional NEC driver 
65U read capability 
NMHZ Capability 



$100.00 

POSTAGE 
PAID 



DIGI COM ENGINEERING , INC. 

P.O. Box 1SS6 
Kodlak. Alaska 99615 

ORDERING INFORMATION: Check, money order or C.O.D. 's accepted. 
Shipment VIA first class mail. Allow approximately one week for delivery. 
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NEW FROM D & N MICRO PRODUCTS, INC. 




MICRO-80 COMPUTER 



Z80A CPU with 4MHz clock and CP/M 2.2 
operating system. 64K of low power static 
RAM. Calendar real time clock. Centronics 
type parallel printer interface. Serial inter- 
face for terminal communications, dip 
switch baud rates of 150 to9600.4"cooling 
fan with air intake on back of computer and 
discharge through ventilation in the bot- 
tom. No holes on computer top or side for 
entry of foreign object. Two 8" single or 
double sided floppy disk drives. IBM single 
density 3740 format for 243K of storage on 
each drive. Using double density with 1K 
sectors 608K of storage is available on a 
single sided drive or 1.2 meg on a double 
sided drive. Satin finish extruded 



aluminum with vinyl woodgrain decorative 
finish. 8 slot backplane for expansion. 48 
pin buss is compatible with most OSI 
boards. Uses all standard IBM format CP/M 
software. 

Model 80-1 200 $2995 

2 8" single sided drives, 1.2 meg of 
storage 
Model 80-2400 $3495 

2 8" double sided drives, 2.4 meg of 

storage 
Option 001 $ 95 

Serial printer port, dip switch baud rate 

settings 



Software available in IBM single density 8" format. 



Microsoft 




Digital Research 


Basic-80 


$289 


PU1-80 


Basic Compiler 


$329 


Mac 


Fortran-80 


$410 


Sid 


Cobol-80 


$574 


Z-Sid 


Macro-80 


$175 


C Basic-2 


Edit-80 


$105 


Tex 


MuSimp/MuMath 


$224 


DeSpool 


Mu Lisp-80 


$174 


AshtonTate 

dBase II 





Mlcropro 


$459 


Wordstar 


$ 85 


Mail-Merge 


$ 78 


Spellstar 


$ 95 


SuperSort I 


$110 


Pascal 


$ 90 


Pascal/MT + 


$ 50 


PascalZ 




Pascal M 



$299 
$109 
$175 
$195 

$429 
$349 
$355 



$595 



Convert almost any static memory OSI machine to CP/M® with the D & N-80 CPU Board. 



Z80A CPU with 4MHz clock. 2716 EPROM 
with monitor and bootstrap loader. RS-232 
serial interface for terminal communica- 
tions or use as a serial printer interface in a 
VIDEO system. Disk controller is an Intel 
8272 chip to provide single or double densi- 
ty disk format. 243K single density or 608K 
double density of disk storage on a single 
sided 8" drive. A double sided drive pro- 
vides 1.2 meg of storage. DMA used with 
disk controller to unload CPU during block 
transfers from the disk drives. Optional 
Centronics type parallel printer port com- 



plete with 10 ft. cable. Optional Real Time 
Calendar Clock may be set or read using 
'CALL' function in high level languages. 
Power requirements are only 5 volts at 1.4 
amps. Available with WORDSTAR for serial 
terminal systems. 
INCLUDES CPM 2.2 

D & N-80 serial $695 

D & N-80 serial w/Wordstar $870 

D & N-80 video $695 

OptionOOl $ 80 

parallel printer and real time 

calendar clock 




D & N-80 CPU BOARD 



OTHER OSI COMPATIBLE HARDWARE 



IO-CA10X Serial Printer Port $125 

Compatible with OS-65U and OS-65D soft- 
ware 

IO-CA9 Parallel Printer Port $175 

Centronics standard parallel printer inter- 
face with 10 ft. flat cable 
BP-580 8 Slot Backplane $ 47 

Assembled 8 slot backplane for OSI 48 pin 
buss 

24MEM-CM9 $380 24MEMCM9F $530 
16MEM-CM9 $300 16MEM-CM9F $450 
8MEM-CM9 $210 8MEM-CM9F $360 
BMEM-CM9F $ 50 FL470 $180 

24K memory/floppy controller card sup- 
ports up to 24K of 21 14 memory chips and 
an OSI type floppy disk controller. 
Available fully assembled and tested with 
8, 16, or 24K of memory, with floppy con- 
troller (F). Controller supports 2 drives. 
Needs separated clock and data inputs. 
Available Bare (BMEM-CM9F) or controller 
only (FL-470). Ideal way to upgrade 
cassette based system 



C1P-EXP Expansion Interface $ 65 

Expansion for C1 P 600 or 610 board to the 
OSI 48 pin buss. Requires one slot in 
backplane. Use with BP-580 backplane 
BIO-1 600 Bare IO card $ 50 

Supports 8K of memory, 2 16 bit parallel 
ports may be used as printer interfaces. 5 
RS-232 serial ports, with manual and Molex 
connectors 

DSK-SW Disk Switch $ 29 

Extends life of drive and media. Shuts off 
minifloppy spindle motor when system is 
not accessing the drive. Complete KIT and 
manual 

D & N Micro Products, Inc 

3684 N.Wells St. 

Fort Wayne, Ind. 46808 

(219)4856414 



TERMS $2.50 shipping, Foreign orders add 15%. 
Indiana residents add 4% sales tax. 



Disk Drives and Cables 
8"ShugartSA801slnglesided $395 

8 "ShugartSA851 double sided $585 

FLC-66ft.cablefromD&NorOSI $ 69 

controller to 8" disk drive 
51/4"MPIB51 with cable, power $450 

supply and cabinet 
FLC-51/48ft.cableforconnection $ 75 

to 5 1/4 drive and D & N or OSI 

controller, with data separator and 

disk switch 
Okldata Mlcrollne Printers 
M L 82A Dot Matrix Printer $534 

1 20 CPS, 80/1 20 columns, 9.5 " paper width, 
friction or pin feed 

ML 83A Same as 82A except $895 

16" paper width, 132/232 columns with 
tractor feed 

ML 84 Same as 82A except 200 CPS, $1152 
16" paper width, 132/232 columns, 2K buf- 
fer, dot addressable graphics, with tractor 
feed 
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Space Invasion 
for OSI C I P/Superboard 



by John S. Seybold 



Space Invasion 

requires: 

OSI C1P or Superboard 

In this real-time arcade game you must 
fight waves of incoming aliens. Each 
time you clear the screen of aliens it 
refills with more aliens, faster and 
closer than the last bunch. The more 
times you clear the screen, the more 
points each alien is worth. 

The aliens are moved by the user 
routine; their addresses are updated in 
line 2510. Z tells the routine which 
way to move the aliens. To adjust the 
pace of the game, you may adjust line 
2082 or line 2520. If you remove all of 
the REM statements, the program 
should run in 4K of memory. 



Mr. Seybold is employed by General 
Dynamics in Pomona, CA. He has owned 
an OSI Superboard for a year and a half. 
Address correspondence to 3210 Quartz 
Lane, #A-10, Fullerton, CA 92631. 




Space Invasion 



2 DIMAC 49 > ' W=S3366 ' WU=W-17 ' AZ=730 ' X=54214 ' ¥=34233 

5 REM-RDJUST LINES 2326 RHD 2862 FOR SPEED. ROD SOUND TO 639,7900 

1 GO3UB200 ' POKE 1 1,34' POKE 12,2' SC=0 

20 HS*="HIGH SCORE" ' PRINT" SPACE INVASION" 

40 PRINT" " 'GOSUB290'V=32'KB=37098'M=251 

30 PRINT"C > RIGHT" 'PRINT"X > LEFT" ' PRIHT"M > FIRE" 'PRINT 

80 PRINT ' INPUT"DIFFICULTV LEVEL < 1-5 ';" i > IF': D< 1 DORC D>5 )THEN80 

100 PRINT"HIT 'M' TO STRRT" ' POKE330, 1 ' POKEKB, M 

110 IFPEEK<KB)*MTHEN919 

120 GOTO110 

200 F0RK=1TQ12 ' PRINT ' NEXT ' RETURN 

400 REM-TURRET FIRE ROUTINE********** 

416 TM=P-V ' IFPEEKX TM X >RRTHENPQKETM, 39 ' RETURN 

420 POKETM , V ' RM=RM- 1 ' TM=0 ' SC=SC+ 1 ■■ RETURN 

600 REM-TURRET FIRE UPDATE ROUTINE*** 

6 1 JxPEEKC TM > ' I FJ=RRTHEHTt1=0 ■■ RETURN 

620 POKETM , V ' TM=TM-V ' IFTI"Kfl< B >THENTM=9 ' RETURN 

625 I FTM=RFTHENTM=*0 ' RETURN 

630 J=PEEKC TM ) ' IFJ=VTHEHPOKETM, 39 ' RETURN 

648 POKETM , V ■■ TM=0 ■■ I F J< > ARTHENRETURN 

650 RM=RM-1 ' SC=SC+1S ' SC*=STR*< SC ) ' FORK=1TOLEN< SCt 5 

668 P0KEW+K,flSO:MID*<SC*,K, 1 > ) ' NEXTK ' IFSC<HSTHENRETL1RN 

67S HS=SC'REM-HIGH SCORE PRINT ROUTINE***** 

680 FGRK=1T0LEN<HS#+STR*CHS>> 

690 POKEWW+K, RSCC MID*C. HS»+STR*< HS ';, K, 1 ) J ' NEXTK ' RETURN 

700 REM-RLIEN FIRE UPDATE ROUTINE**** 

710 POKERF,, V ■■ AF=RF+V ' J=PEEK'; RF ) ' IF'-. .J=flfl )0R< AF>P !>THENflF=0 ' RETURN 

720 IF J=CVTHENPOKEAF , V ' AF=0 ' RETURN 

730 POKERF , 39 ' RETURN 

900 REM-SET UP SCREEN************************* 

910 F0RK=1T025 ' PRINT ' NEXT ' P0KE54149, V ' Z=54887 ' CV=161 

920 F0RK= 1 T04 ' POKEZ , CV ' P0KEZ+ 1 , CV ' POKEZ+V , CV 

930 POKEZ+33, CV < POKEZ-V, CV ' POKEZ-31 , CV ■ Z=Z+5 ' NEXTK ' P=54224 ' BB=49 

1000 13=1 ' RF=0 ' TM=0 ' RM=BB ' C=1.0 ' Z=l ' RA=231 > TURRET =236 

1010 CL=7 ' FORK* 1 TOCL ' RERDfliC K ) ■ fl< K )=R< K )+ V*D ■ POKERC K ) , RR 

1020 FORI=KTOBBSTEPCL' IFI=KTHENNEXTI 

1030 AC 1 'J=R< I-CL >+2*V ' POKER< I >, RA ' NEXT I ■ NEXTK ' POKEP, TU ■ G0SUB63B 

1040 F0RI=34ST0623 ' RERDJ ' POKE I , J ' NEXT I 

2000 REM-MOVE ALIENS? PROGRAM LOOP********************************: 

23 1 B C=C- 1 ' I FPEEK< BC B ) >=VTHEHS=B+ 1 

2088 I FPEEK't AC BB 5 !>=VTHENBB=BB- 1 

20S2 IFC=>0THENFORK=1TO< 60-5*D ) ' NEXTK ' GOTO4020 

2083 IFRTHEH2300 

2885 IFZ<0THEN2100 

2090 F0RK=YT0fl< B JSTEP-V ' IFPEEKf. K ';=AATHENZ=V-Z ' R=l ' G0T04828 

2095 NEXTK ' GOTO2500 

2100 FORK=XTORC B >STEP-V ' IFPEEKX K >=ARTHENZ=V-Z 'R=l 'GOTO4020 

2118 NEXTK 

2500 IFZ>8THENPOKEAZ,Z'GOTO2510 

2505 P0KER2, 256+2 

2510 X=USRi. X > ' F0RK=BT0BB ' W, K 5=RC K ?+Z ' NEXTK ' IFfK BB :>=>XTHEH7900 
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Space Invasion (continued) 

2320 R=0'C=.3+<RM.'-3): IFflBSi;Z><>lTHEN2=Z-V 

4039 REM-CHECK FOP. TURRET FIRE****** 

4020 J=PEEK< KB !> ' I FC < JORM )=M )RNDTM=9THENG0SUB4 1 

4493 REM-CHECK FOR TURRET MOVEMENT** 

4500 IFC J0R191 X >1S1THEN4S00 

4320 IFPOYTHEN' POKEP, V>P»P+1 ■■ POKEP, Tib GOTO5009 

4690 IFCJOR127K>127THEN3000 

46 1 I FP< 5-XTHEN • POKEP , V ■■ P=P- 1 • POKEP .. T1J 

4950 REM-HLIEN FIRE***************** 

5006 IFnF<>0THEHGOSUB710:COTOS100 

5010 RL*BB-INT<3*RND<3>>' IFRL<BTHENRL-BB 

3040 IFPEEUX rV. RL > >RflTHENflF-FIC RL HV ' POKERF.. 39 

5109 IFPF=PTHEN7909 

3200 IFTMTHENGOSUBS10- IFRM<=0THEN900B 

5219 GOTO201S 

7S90 REM-TURRET DESTROVED******************************************** 

7900 FOR I = 1 TO2B0 ■■ POKEP , 2 : POKEP , 3 

7920 POKEP , 232 ' POKEP , 233 ' POKEP , 32 • NEXT ■■ GOSUB200 

7330 PRINT"THE ALIENS HRVE" 'PRINT 'PRIHT"OVERCOME YOUR DEFENSES" 

7960 PRINT'PRINT"flND LANDED !!": GOSUB200 

7963 PR I NT "YOUR SCORE WAS" ;SC 'PRINT 

79S0 F0RK»1T08 ' POKEW+K, V = NEXTK ' FORI = 1TO3000 < NEXT I 

S000 FORK=XTOY ■■ POKEK, V = NEXT •■ POKE330 , 

S020 GOSUB200' PRINT" SPRCE INVADERS" 'GOSUB200 

3925 INPUT "PLAY AGAIN" ;K*' IFLEFWKS, 1 >="Y"THENRESTORE ■ GOTO IS 

3030 FORK=WWTO Y ' POKEK , V ■■ NEXTK ' END 

3990 REM-NEXT SCREEN***************** 

9000 RESTORE' IFD<7THEND=D+1 

9010 FORK=XTOY' POKEK.. V' NEXT' IFTMO0THENPOKETM.. V 

9045 IFAFO0THENPOKEflF,V 

9039 POKEP, V'GOTOS 10 

10000 DATA 53354, 53356, 53353, 53360.. 53362, 53364. 53366 

10010 DATA 216,169,211, 133,217,169,0, 133,216, 160,253, 177,216, 201 : 231 

10020 DATA 293,3,32,66,2, 136,208,244, 198,217, 169, 207, 137, 217, 208, 234 

19030 DATA 96, 169,32,145,216, 152, 72, 174, 238, 2, 4S, 27, 24, 109,233,2,163 

10049 DRTR 176,3, 169,231, 145,216, 104, 168, 136,36,230,217, 169,231, 145 

10050 DRTR 216, 198,217, 104, 168,136,96,24,109,238,2,163,24,144,228 

JWCftO 



Don 



, t for9 ei! 



Visit 



/AlCftO 

at the 

Northeast 
Computer Show 

Nov. 11-14, 1982 

Hynes Auditorium 
Boston, Massachusetts 

Booth #406 

We look forward to meeting you! 



«*># VANTEC 80 

The COMPLETE 80 COLUMN VIDEO Board 

with HIGH RESOLUTION GRAPHICS 

CAPABILITY for your APPLE. 

At last., .a complete video board tor your Apple II or Apple 
11+ microcomputer. No longer are "Soft Switches, Lower 
case E proms" and low quality graphics necessary. By 
mixing the 80 column video directly onto the normal video 
output, either high resolution graphics, low resolution 
graphics or 40 column text may be combined with the 
80 column display. 
Save $90 on Introductory Special .... (List $389) .... $299* 

RC Electronics Inc. 

7265 Tuolumne Drive, Goleta, CA 931 1 7 
(805)968-6614 ^ 

Dealer Inquiries Invited L_ I 




• The VANTEC 80 is the only board that can overlay an 80 
character display on the normal Apple video. 

• Software switching between 80 & 40 character displays. 

• Mix High Res or Lo Res graphics with the 80 character 
text display. 

• Upper and lower case characters with shift mod provided. 

• Flashing or inverted block video cursor. 

• Apple-soft, Apple Pascal and Z80 Softcard® compatable. 

•Special Introductory Pricing available for systems purchased before Nov. 30, 
1982. Credit card orders add 3%. California orders add 6% sales tax. 
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GAMES FEATURE 



Apple Shootdown 



by Eric Grammer 



A type and RUN low-resolution 
graphics game. 

Shoot Down 

requires: 

Apple II with Applesoft and 
game paddles 

Here is a simple game with a short 
machine-language sound program. The 
oject of the game is to shoot at all the 
columns with dots in them. The dots 
will fire back at you. To move your ship, 
use paddle (0) . To fire, press the button. 
The machine-language section 
should be BSAVEd with A$300, L$30. 
The lo-res graphics listing is straight- 
forward and is fairly self-explanatory. 
Good shooting! 



Assem 


bier Listing I 

i 

2 

3 


.aser Fire 




* 
* 
* 


LASER FIRE 








5 
6 
7 
8 


* 
* 


ERIC GRAMMER 






ORG $300 








9 


********************** 








10 


DEFEAT 


EPZ $06 








11 I 


JSRRPT 


EPZ $07 








12 1 


fLOOP 


EdU $330 








13 5 


<L0OP 


EQU $331 








14 


5PKR 


EdU SC030 








15 


********************** 








16 


5TART: 




0300 A9 


00 




17 




LDA #$00 


0302 85 


06 




18 




STA REPEAT 


0304 A5 


06 




19 


[OOP 


LDA REPEAT 


0306 C5 


07 




20 




CMP USRRPT 


0308 FO 


08 




21 




BEO END 


030A E6 06 




22 




ItC REPEAT 


030C 20 


13 


03 


23 




JSR FIRE 


030F 4C 


04 


03 


24 




JMP LOOP 


0312 60 






25 


END 


RTS 


0313 A2 


00 




26 


FIRE 


LTX #$00 


0315 AO 


00 




27 


K1EAR 


LOT #$00 


0317 AD 


30 


CO 


28 




LDA SPKR 


031A C8 






29 


DELAY 


TOY 


031B 98 






30 




HA 


03 1C 8E 


30 


03 


31 




STX YLOOP 


031F CD 


30 


03 


32 




CMP YLOOP 


0322 30 


F6 




33 




EMI DELAY 


0324 E8 






34 




I NX 


0325 8E 


31 


03 


35 




STX XLOOP 


0328 A9 


FF 




36 




LDA #$FF 


03 2A CD 


31 


03 


37 




CMP XLOOP 


032D DO E6 




38 




are yclear 


032F 60 






39 




RTS 


0330 






40 




END 



The author may be contacted at 95 Old 
Street Road, Peterborough, NH 03458. 



Listing 1: Shoot Down Applesoft Listing 



10 PRINT : PRINT CHR$ (4)"BLOAD IASER FIRE.OBJ" 

20 TEXT : HOME : PRIWT "SHOOT DOWN" 

25 DIM V(40) 

30 PRINT : PRINT "WAT'S TOUR SKILL LEVEL?" 

40 PRINT : PRINT "1. SIMPLETON" 

50 PRINT "2. FAIR" 

60 PRINT "3. GOOD" 

70 PRINT "4. EXCELIANT" 

80 PRINT "5. MR. PERFECT" 

90 PRINT : PRINT "PLEASE PRESS THE NUMBER OF TOUR CHOICE:"; 

100 GET SK$: IF VAL (SK$) < 1 OR VAL (SK$) > 5 THEN 100 

110 SKILL = VAL (SK$) 

120 VTAB SKILL + 4: FLASH : HTAB 1: PRINT SKILL;: NORMAL 

130 VTAB 20: PRINT "PRESS AW KEY TO BEGIN... ";: GET A$ 

140 POKE 7,1 

160 TEXT : HOME 

170 GR : COLOR" 1 

180 X = LOT ( POL (0) / 7.3): GOSUB 380 

190 FOR X = 1 TO 21 STEP 4: FOR Y = 3 TO 35 STEP 4: PLOT Y,X: NEXT Y,X 

200 COLOR- 5 

210 FOR X = 3 TO 19 STEP 4: FOR Y = 5 TO 33 STEP 4: PLOT Y,X: NEXT Y,X 

220 SHIPS = 6 - SKILL 

225 HOME : VTAB 24: PRINT SUPS" SHIP";: IF SHIPS = 1 THEN PRINT " LEFT 
1": GOTO 230 

227 PRINT "S LEFT" 

230 IF INT ( RND (1) * (7 - SKILL)) = 1 THEN GOSUB 440 

240 X = INT ( POL (0) / 7.3): IF B < > X THEN GOSUB 380 

250 IF PEEK ( - 16287) > 127 THEN CALL 768: GOSUB 280: GOTO 230 

260 IF INT ( RND (1) * (7 - SKILL)) = 1 THEN GOSUB 440 

270 GOTO 230 

280 COLOR- 15 :C =■ X 

290 FOR I = 34 TO STEP - 2 

300 X = INT ( PDL (0) / 7.3): IF X < > B THEN GOSUB 380 

310 FOR L = 1 TO 20: NEXT 

320 COLOR" 15: VLXN I.I + 2ATC + 2 

330 COLOR= 0: PLOT C + 2,1 

340 PLOT C + 2,1 + i: PLOT C + 2,1 + 2 

350 NEXT I 

360 V(C + 2) = 1 

366 COLOR= 14: VLXN 35,37 AT B + 2 

370 RETURN 

380 COLOR- 0: HLTN B,B + 4 AT 39: HLIN B,B + 4 AT 38: HLIN B + 1,B + 3 AT 
37 

390 VLIN 35,37 AT B + 2 

400 B - X 

410 COLOR- 14: HLTN B,B + 4 AT 39: HLTN B,B + 4 AT 38: HLIN B + 1,B + 3 AT 
37 

420 VLIN 35,37 AT B + 2 

430 RETURN 

440 IF TOT ( RND (1) * 2) = 1 THEN 460 

450 Yl = INT ( RND (1) * 6) * 4 + 1:X1 = TNT ( RND (1) * 9) * 4 + 3: GOTO 
470 

460 Yl - TOT ( RND (1) * 5) * 4 + 3:X1 = TNT < RND ( 1) * 8 + 1) * 4 + 1 

470 Yl = Yl +1: IF V(X1) = THEN 490 

480 GOTO 860 

490 COLOR= 15 

500 CALL 768: CALL 768 

510 FOR L = Yl TO 38 - SKILL STEP SKILL: VLIN L.L + SKILL AT XI 

520 X = INT ( PDL (0) / 7.3): IF B < > X THEN GOSUB 380 

530 NEXT 

540 COLOR- 

550 FOR L = Yl TO 34 STEP 3: VLXN L,L + 4 AT XI: NEXT 

560 IF SCRN( XI, 39) < > THEN 590 

570 COLOR= 0: VLIN Y1.39 AT XI 



580 CC = 0: RETURN 
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Listing 1 (continued) 



590 
595 
600 
610 
620 
630 
640 
650 
655 

660 
670 
680 

690 



COLDR= 15 

HOME 

FOR A. = 35 TO 39: HUN X,X + 4 AT A: NEXT 

COLDR= 0: TON X,X + 4 AT 35: CALL 768 

HUN X,X + 4 AT 36: CALL 768 

4 AT 37: CALL 768 

4 AT 38: CALL 768 

4 AT 39: CALL 768 

1 THEN PRINT "PRESS ANY KEY FOR NEXT SHIP "; : GET AS:SHI 
= INT ( PDL (0) / 7.3): GOSUB 380: GOTO 225 
5 



HLTN X,X 

HLIN X,X 

HLIN X,X + 

IF SHIPS 

PS = SHIPS - 1:X ■ 

IF X < 5 THEN X = 



IF X > 32 THEN X = 32 
FOR V = 20 TO 23: VTAB V: 

" ; : NEXT V 
FOR L = 1 TO 4: VTAB 24: HTAB X 



1TAB X: PRINT "GAME";: CALL 768: HTAB X: PRINT 



L: PRINT "GAME 



CALL 768: NEXT 



700 FOR V = 20 TO 23: VTAB V: HTAB X: PRINT "OVER";: CALL 768: HTAB X: PRINT 

" ; : NEXT V 
710 FOR L = TO 3: VTAB 24: HTAB X + L: PRINT " OVER";: CALL 768: NEXT 

720 PRINT : PRINT 

730 PRINT "CARE FOR ANOTHER GAME? (Y/N) : "; 

740 GET G5: IF G$ = "N" THEN 770 

750 IF G? = "Y" THEN CLEAR : GOTO 20 

760 GOTO 740 

770 HOME : TEXT 

780 I = 

790 I = I + 1: VTAB I 

800 FOR A = 39 TO 1 STEP - 1: HTAB A: PRINT ">"; : HTAB A: PRINT " "; : NEXT 

A 
810 1=1+1: VTAB I 

820 FOR A = 1 TO 39: HTAB A: PRINT "<"; : HTAB A: PRINT " "; : NEXT A 
830 IF I < 20 THEN 790 
840 VTAB 1: FOR I = 1 TO 20: VTAB I: HTAB 40: PRINT ;: VTAB I: HTAB 4 

0: FOR A = 1 TO 5: NEXT A: PRINT " "; : NEXT I 
850 HOME : END 

860 FOR CO = 3 TO 35 STEP 2: IF V(CO) = THEN CC = 1: GOTO 440 
870 X = INT ( PDL (0) / 7.3): IF B < > X THEN GOSUB 380 
880 NEXT CO 

890 CALL 768: CALL 768: CALL 768: PRINT "YOU WINI" 
900 GOTO 720 
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JuierpHttng #nflman? £ 



presents 



OSI C4P-MF SOFTWARE 




THE HOST EXTENSIVE DM ADVENTURE/FANTASY 
FOR THE OSI ' YOU MUST TRAVEL THROUGH 
THE EVIL LANDS OF ISIERON. F1GHTINO AND 
KILLING MONSTERS ANO MAGIC-USERS EVERY 
STEP OF THE UAY! YOUR GOAL IS TO SEEK 
OUT CERTAIN TREASURES THAT UILL ALLOU 
YOU TO FREE THE LANO FROM THE EVIL CHAIN 
OF MAGIC CASTLES! COMPLETE .'ITH FULL 
GRAPHICS DISPLAY, COLOR ANO SOUND' 

INCLUDES A COMPREHENSIVE HANUAL. ALL 
THIS FOR ONLY 129.93 



SEND TOi SEND «! FOR OUR 

INTERESTING SOFTWARE CATALOG OF THE 

21101 S. HARVARO BLVD. FINEST 0SI-C4P 

TORRANCE' CA 90301 NF SOFTWARE... 





USERS! 



READ . . . 




The Unofficial OSI Users Journal 



THE WORLD WIDE PUBLICATION 
EXCLUSIVELY DEDICATED TO OSI USERS! 

□ Hardware Mods. □ Peeks and Pokes □ Bugs and Fixes 

□ Software Exchange □ Software Reviews 

SEND $15.00 FOR 12 ISSUES TO: 

PEEK (65) P.O. BOX 347, OWINGS MILLS, MD 21117 (301)363-3267 



Maryland Subscribers Add 5% Tax 



Inquire for Foreign Rates 
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Skyles Electric Works Presents 







The VicTree" 



. ..Leaves your new Vic (or CBM 64) with 35 additional commands. 
. ..Branches out to most BASIC 4.0 programs. 
. . . Roots into most printers. 

New from Skyles: the VicTree, a coordinated hardware and software package that allows your Vic 
to branch out in unbelievable directions and makes it easier than ever to do BASIC programmin< 
debugging and to access your disk. And the new VicTree provides routines to interface the Vic tc 
the powerful ProMet local network. 8kb of ROM — 4kb for the BASIC commands, 4kb for disk 
commands and interfacing to ProMet — plus 4kb of RAM for miscellaneous storage. Perfect not 
only for the new Vic but also for the Commodore 64. Unbelievably simple to use and to install, tl 
VicTree gives you all the additional BASIC 4.0 commands to allow most BASIC 4.0 programs to 
work on your new Vic or CBM 64. 

Now only $89. 95... or $99.95 complete with Centronics standard printer cable. (Cable alone 
$ 19.95.) Available now from your local dealer or order through your Visa or MasterCard toll fret 

(800) 227-9998 (California, Canada, Alaska, Hawaii: (415) 965-1735) or send check o 

money order directly to: 




Skylcs Electric Works 



231 E South Whisman Road 
Mountain View, CA 94041 
(415)965-1735 
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By Loren Wright 



What to Do with 96K — 

Two Word Processor Approaches 

For the designers of Wordcraft Ultra 
and WordPro 5 Plus, it must have been 
a pleasant dilemma. Steve Punter and 
Pro-Micro Software had their popular 
WordPro 4 Plus to upgrade, while P.L. 
Dowson and DataView had the sleek 
Wordcraft 80 to work with. It is only 
logical that the extra memory provide 
more room for text, but it is what else 
has been added to the programs that 
makes them so interesting. 

This column is devoted to a discus- 
sion of these two word-processing pro- 
grams for the CBM 8096. Because these 
versions retain all the features of their 
predecessors, my discussion should be 
of use to people with 8032s, as well as 
to those with 8096s. A future PET Vet 
column will cover word processors for 
the 40-column PETs. 

Wordcraft Ultra will run on an 
8096, an 8032, or an 8032 expanded 
with Madison Computer's ZRAM 
board. WordPro 5 Plus is designed 
specifically for the 8096; it will not 
work with the 8032. Wordcraft versions 
require a special "data key" (formerly 
known as a "dongle"|, while WordPro 
versions require a functional ROM in 
the $A000 socket. 

I will start with a general discussion 
of the two word processor families. Ex- 
cept where otherwise noted, Wordcraft 
refers to all the Ultra configurations 
and Wordcraft 80, while WordPro refers 
to WordPro 4 Plus and WordPro 5 Plus. 
I will also discuss the extra enhance- 
ments in the new versions. 

The "Flavor" of WordPro 

WordPro essentially presents you 
with a continuous scroll of 80-charac- 
ter lines on which to type. You start in 
the upper left-hand corner and keep 
typing until you're done. Words get 
split, but (not to worry) they will be 
kept together at output time. This, 
coupled with there being only two 
status lines, allows a lot of text to be 
viewed at once. Margins, centering, jus- 
tification, paging, line spacing, and 
several other features are handled at out- 
put time. These are specified in the text 



on special, non-printing format lines. 

If you're working with elaborate 
tables or a particularly fancy text, the 
continuous nature of the text and the 
distracting format lines make it dif- 
ficult to visualize what the result will 
look like. There is a special output-to- 
video command that will show you the 
results on the screen, without wasting 
paper, but editing must still be done on 
the original, continuous version, and 
this is time consuming. 

WordPro has a special feature called 
"Extra Text," which may be used to 
hold other text files, disk directories, 
commonly used phrases and paragraphs, 
or files of names and addresses for fill- 
ing form letters. In WordPro 5 Plus 
there are four such extra text areas. 
WordPros 3 and 4 have only one, but 
the relative sizes of the extra and main 
text areas can be apportioned differently 
for different needs. I used WordPro 5 
Plus to write this column, primarily 
because of the "append characters" 
function. I stashed the names WordPro, 
WordPro 5 Plus, Wordcraft, and Word- 
craft Ultra in extra memory, so that 
with only a few keystrokes I could copy 
those characters at the current cursor 
position. Whole paragraphs are handled 
in a similar manner. The extra text also 
makes it possible to have a whole file of 
names and addresses in memory at the 
same time as the target form letter. 

The "Flavor" of Wordcraft 

If you've used a big, dedicated word 
processor, you will be more comfort- 
able with Wordcraft. With a few excep- 
tions, what you see on the screen is 
what you get on paper. You can tell 
how lines will look before they are 
printed. Even documents wider than 80 
columns can be handled. The screen is 
a window that can be panned across the 
text. If a really long word has been 
moved to the next line, leaving the 
previous one too short, you can easily 
tell where to insert a soft hyphen to 
even up the line lengths. Most format 
commands are indicated by the presence 
of reverse field on a text character, but 
they don't take up space on the screen. 
Instead of giving you a continuous scroll 
of lines, Wordcraft gives you a certain 
number of characters to work with. It 
forces new pages as needed according to 
your page-length specifications. 



One powerful feature of Wordcraft 
is the ruler, which indicates the posi- 
tions of your margins and tab stops. Its 
current contents are shown on the bot- 
tom status line (of five). The ruler may 
be changed at any time. If you're trying 
to get a table to look just right, you can 
try out one arrangement of tab stops, 
type in your text with tab characters at 
the right points, and then go back and 
readjust your ruler without reentering 
the text or the tab characters. The text 
will automatically line up at the new 
tab stops as soon as you finish changing 
the ruler. 

A Comparison of WordPro 
and Wordcraft 

Now that I have discussed the 
special features of Wordcraft and Word- 
Pro, I can compare them on what they 
have in common. Most word processors 
perform the following functions in some 
way. Some do them better than others. 

Entry of Text: Both programs do a 
good job here. You can continue typing 
without worrying about the way words 
carry over to the next line. WordPro 
uses a simple carriage return to force a 
new line and the tab key to advance to 
the next tab stop. With Wordcraft, 
these must be preceded by the control 
key. The Commodore business key- 
board, with its full cursor control, is 
well-suited to word processing. 

Editing of Text: Both WordPro and 
Wordcraft have commands for deleting, 
inserting, transferring, and duplicating 
text. In general, Wordcraft 's commands 
are more powerful, making cut-and- 
paste operations very easy. WordPro's 
delete, transfer, and duplicate com- 
mands have restrictions, which can be 
circumvented by inserting and deleting 
spaces. Insert mode with WordPro is 
more convenient. 

Search and Search-and-Replace: 
Neither program excels at these func- 
tions. WordPro's command structure is 
complicated. The search-and-replace 
command is an all-or-nothing proposi- 
tion. The search command finds the 
next occurrence of the search string, 
but requires a different command se- 
quence to continue searching for the 
same string. Both commands can act 
globally or just on the current file, and 
there is an option to ignore case. Word- 
craft's commands make more sense, but 
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there is no global option and delimiters 
(an artifact from line editors) are re- 
quired around the search string. Both pro- 
grams use the '?' as a "wild" character. 

File Maintenance: WordPro makes 
this easy. It is possible to recall files 
using a few characters and an asterisk 
(the same as with other PET files]. 
Also, file names can be read directly 
from the text area of the screen, such as 
from a comment line or directory 
listing. It is also possible to get a selec- 
tive directory listing. When you have 
specified a file name that already ex- 
ists, WordPro asks you if you want to 
replace it. Wordcraft, with its chapter 
organization and optional descriptive 
names and dates, makes documenta- 
tion of the contents of a disk much 
more complete. However, saving and 
loading files is more cumbersome. Full 
file names must be typed in. 

Support of Printers: WordPro fully 
supports a limited number of printers. 
It was designed specifically with the 
NEC Spinwriters in mind, and the com- 
bination works very well. The Diablo 
630, Qume Sprint 5, CBM 8027, TEC 
1500, and dot matrix types, are sup- 
ported as well. However, other printers 
may not be fully supported. Wordcraft 
comes with a long list of printer data 
files, each matched to a particular 
printer/print wheel combination, on 



the master disk. The Wordcraft dealer 
can obtain a PDF from the distributor 
for just about any printer that runs off 
the IEEE. Wordcraft Ultra has special 
features for supporting printers with 
proportional spacing print wheels. 

Generation of Form Letters: Word- 
craft's handling of these is more power- 
ful. The fields in the letter have unique 
identifiers, so that the same piece of in- 
formation from the fill file may be re- 
used. This avoids a lot of extra typing 
when you construct the fill file. How- 
ever, the fill file must be used from the 
disk, and while entries may be used 
selectively, it is difficult to remember 
which page numbers go with which en- 
tries in the file. This makes editing dif- 
ficult. WordPro, with its extra memory 
feature, allows the fill file and the form 
letter to be in memory at the same time, 
making editing much easier. Blanks in 
the form letter are filled sequentially, 
so if the same item has to be reused in 
the letter it must appear twice in the 
fill file. Selective use of entries from 
the fill file is also more difficult. 

Handling of Long Files: WordPro 
has a chaining feature that allows a 
document to extend beyond the capaci- 
ty of the computer. Print, search, 
search-and-replace, copy, and output- 
to-video commands can all be specified 
with global options. A global command 
will operate not only on the file in 



memory, but also on all the files linked 
to it and stored on disk. 

Wordcraft, instead of chaining files, 
uses a "chapter" organization. To con- 
tinue a file, save the first as chapter 1, 
then assign the continuation to chapter 
2 of the same file. Files may be printed 
out globally, or by specifying a certain 
range of chapter nupibers. Also, in- 
dividual pages may be selected. How- 
ever, commands such as search, search- 
and-replace, and copy act only on the 
chapter in memory. 

What's Been Added? 

Wordcraft' s text size has been 
approximately doubled, from about 
11,000 characters in Wordcraft 80 to 
over 20,000 in Wordcraft Ultra. Word- 
craft 80 requires the master disk to be 
present in one drive, since the editor 
and print module could not reside in 
memory at the same time. With Word- 
craft Ultra the entire program resides in 
memory at one time, leaving both 
drives available for file operations. 
(The 8032 configuration requires a 
ROM, which contains program mod- 
ules.) Wordcraft Ultra adds a set of 
escape codes that provide such capabili- 
ties as selective double-spacing and 
centering or right alignment of a series 
of lines. Other escape codes handle 

(continued) 



UPGRADE YOUR AIM-65* INSTANTLY 



'A trademark of Rockwell Inc. 



To A 6809 Development System 

With The 
"MACH-9' 

From 

M M S Inc. 




INTRODUCTORY PRICE 

$239. 

Plus $6 U.P.S. 
And Handling 

Includes: 

*6809 CPU Plug-in Assembly 
*Super-set of AIM Monitor 
*Two-Pass Symbolic Assembler 
'Complete Monitor Source Listings 
'Enhanced Cut & Paste Editor 
*200 Page Manual 
*Full I/O Control 



"MACH-9" is assembled and tested with 
local BUS, 5 locking low force ROM sockets 
and 2K Static RAM 

M M S Inc. 

1110 E. Pennsylvania St. 

Tucson, AZ 85714 

(602) 746-0418 




VISA 
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pitch, vertical spacing, horizontal spac- 
ing, and proportional spacing. Unfor- 
tunately, these non-printing characters 
occupy space on the screen, making it a 
less accurate representation of what 
will be printed. Also added is support of 
Canadian Micro Distributing' s MUPET 
multiple-user system. Wordcraft Ultra 
also has its own built-in multiple user 
system. Another big improvement is 
the provision to handle proportional 
spacing print wheels. The price of 
Wordcraft 80 is $395, while that of 
Wordcraft Ultra is $545. 

WordPro 5 Plus includes the main 
and four extra text areas, each contain- 
ing 169 80-character lines. Therefore, 
the maximum length of a single file in 
memory has not increased from Word- 
Pro 4 Plus to WordPro 5 Plus, but then 
neither has the price (both $450). 
WordPro 5 Plus has added support of 
the MUPET system, as well. I have just 
barely begun to explore the possible 
uses of the extra text areas. 

Conclusions 

With the possible exception of the 
IBM PC, the CBM 8032/8096 has the 
best keyboard for microcomputer 
business applications. Easy cursor con- 
trol, built-in screen editing, and the 
separate numeric keypad all con- 



tribute. Dedicated word processors 
have many special keys on the key- 
board for all the things a word processor 
has to do. A microcomputer keyboard 
has to be used for applications besides 
word processing, so it can't afford the 
luxury of all the extra keys. Both pro- 
grams take advantage of what the com- 
puter has to offer. 

Overall, I rate Wordcraft as a more 
powerful word processor. However, 
WordPro is much easier to learn. If you 
don't use Wordcraft every day, you will 
find yourself frequently looking things 
up, even if you learned it thoroughly 
the first time around. Beyond that, it 
really depends on what you want to do. 
If you plan to do a lot of "boiler- 
plating" (putting a document together 
using standard phrases and paragraphs) 
then you will find WordPro easier to 
use. If you're working on a really long 
document, such as a book, then the 
chapter organization of Wordcraft will 
be handy. For full control of a variety of 
letter-quality printers, for tabular 
material, and for material wider than 
80 columns, Wordcraft has the edge. A 
big point in WordPro's favor is that it is 
(in its many versions) already the most 
popular word processor on the market 
for Commodore systems. This means 
that it is easier to exchange files with 
other people and that commercial pro- 
grams, such as spelling checkers and 



data-base managers, will be written for 
WordPro first. 

When you consider word processors 
for the 8096 you shouldn't forget 
Silicon Office — a combination word 
processor, data-base manager, and com- 
munications package. Contributing 
Editor Jim Strasma covered it in a full- 
length review in MICRO'S June issue. 
He was particularly impressed with the 
word processor portion. It can handle 
long files much better (the whole 
disk!), can handle multiple-column 
documents, and can perform calcula- 
tions using information from the data 
base. The $995 price is out of the range 
of the word processors covered here, 
but if you need a data-base manager, 
too, be sure to give Silicon Office a lot 
of consideration. 

WordPro is distributed to dealers by 
Professional Software, Inc., 51 Fremont 
Street, Needham, MA 02194. Word- 
craft 80 and Wordcraft Ultra are 
distributed to dealers by Computer 
Marketing Services, Inc., 300 W. 
Marlton Pike, Suite 26, Cherry Hill, NJ 
08002. 



Special thanks to Jim Lucivero of 
NEECO in Needham, MA, for the use 
of letter-quality printers used in this 
review. 
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OSI Disk Users 



Double your disk storage capacity 
Without adding disk drives 

Now you can more than double your usable floppy disk 
storage capacity — for a fraction of the cost of additional 
disk drives. Modular Systems' DiskDoubler™ is a double- 
density adapter that doubles the storage capacity of 
each disk track. The DiskDoubler plugs directly into an 
OSI disk interface board. No changes to hardware or 
software are required. 

The DiskDoubler increases total disk space under OS- 
65U to 550K; under OS-65D to 473K for 8-inch floppies, 
to 163K for mini-floppies. With the DiskDoubler, each 
drive does the work of two. You can have more and 
larger programs, related files, and disk utilities on 
the same disk — for easier operation without constant 
disk changes. 

Your OSI system is an investment in computing power. 
Get the full value from the disk hardware and software 
that you already own. Just write to us, and we'll send you 
the full story on the DiskDoubler, along with the rest 
of our growing family of products for OSI disk systems. 

TW DiskDoubler is a trademark of Modular Systems . 

Post Office Box 16 C 
Oradell, NJ 07649.0016 
Telephone 201 262.0093 



Modular Systems 
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Now . . . The Ultimate 
In Wordprocessing For 
The Commodore Computer. 
WOR DC RAFT ULTRA! 



Wordcraft ULTRA™ turns your Commodore microcomputer into one of the 
world's most advanced word processing systems, incorporating features 
previously found only in systems priced thousands of dollars higher! 

• True proportional spacing with inter-character and 
inter-word spacing ! 

• Multi-user with up to 8 CPU's sharing one or more 
disk drives and printers with no extra hardware 
required other than a cable! 

• Screen layout matches the printed document! You'll 
love the "what you see is what you get" feeling. 

• Continuous centering, delete and insert, movement 
of text, search and replace, tab and indent, bold 
print and underline ... a seemingly endless list of 
features designed to make text editing as simple and 
complete as possible! 

• Wordcraft ULTRA runs on the CBM 8032, 8096 or 
Madison Computer's Z-RAM™ board. The Z-RAM 
Board not only expands your computer to 96K but 
also adds CP/M™ 

Why settle for less when you get so much more with Wordcraft ULTRA 
on the Commodore Computer! 

Contact Your Nearest Commodore Dealer Today . . . 

You'll Be So Glad You Did ! 



In The East Call: 

COMPUTER 
MARKETING services inc. 

300 W. Marlton Pike, Suite 26 
Cherry Hill, New Jersey 08002 
[609] 795-9480 



In The West Call: 

CIMARRON 
CORPORATION 

666 Baker Street, Suite 31 9 

Costa Mesa, California 92626 

[71 4] 641 -11 56 



Z RAM is a trademark of Madison Computer 

CP/M is a trademark of Digital Research 

Wordcraft Ultra is a trademark of Dataview Ltd 
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Apple Hi-Res Graphics 
and Memory Use 



by Dan Weston 



This article examines the 
conflicts of programs and hi-res 
graphics on the Apple II, plus 
several techniques to avoid 
these conflicts. 



Hi-Res 

requires: 

Apple II with 32K 



When you begin to write long programs 
that use the hi-res pages of the Apple II, 
you will overwrite the graphic display 
area if your program and variables are 
longer than 6K. There are many ways 
to get around this problem, which in- 
volve manipulating the pointers Apple- 
soft uses to control memory usage. Here 
I discuss several methods for making the 
most of your computer's memory. 

Normally a BASIC program is loaded 
beginning at memory location $800 
(2048). The program fills memory up- 
wards from $800. LOMEM is set to the 
end of the program and will change as 
the program changes. 

Simple variables are stored from 
LOMEM upward as they are defined by 
the program. Arrays are stored from the 
end of simple variables upward. An ad- 
dition to the simple variable space will 
push the array variables upward with 
no loss of integrity. Finally, string 
variables are stored from the top of 
available memory, HIMEM, downward 
in memory, with new strings being 
placed in successively lower memory 
locations. The pointers that guide the 
placement of variables are summarized 
in figure 1, and will be discussed later 
in this article. 

The problem with this storage 
scheme is that the hi-res pages are 
located between the program and the 



end of memory. Hi-res page 1 display 
area sits between $2000 and $4000 
(16384-24575), and hi-res page 2 sits 
from $4000 to $6000 (24576-32758). 
There is a 6K block of memory between 
$800 and the beginning of hi-res page 1. 
If your program is longer than 6K and 
invokes HGR, you will find that the 
last portion of your program has been 
wiped from memory. Even with pro- 
grams shorter than 6K, an HGR call can 
wipe out arrays and variables that are 
stored above the program. 

To avoid this problem, set LOMEM 



at the upper end of the hi-res page ( 1 or 
2), so that simple variables and arrays 
will be stored above the hi-res area 
rather than across it. This method re- 
quires that the program be less than 6K, 
and that the LOMEM statement come 
before any variables are defined. 
LOMEM: 16384 will store variables 
above hi-res page 1. LOMEM: 24576 
will store variables above hi-res page 2. 
Another method is to put graphics 
on hi-res page 2 instead of page 1 . This 
frees the 8K bytes of the first hi-res page 
for program and variable storage, giving 



Figure 1: Applesoft Memory and Variable Pointers 



Pointer 
Name 



Hex Dec Normal Setting Special Effects 



Beginning of 

Applesoft 

program 


$67 
$68 


103 
104 


program loads 
at $800 


POKE 103,1 
POKE 104,64 
POKE 16384,0 


: program loads 
: above hi-res 
: page 1 




POKE 103, 1 
POKE 104,96 
POKE 24576,0 


: program loads 
: above hires 
: page 2 


LOMEM 
beginning of 
simple 
variables 


$69 
$6A 


105 
106 


end of current 
program 


POKE 105, 1 
POKE 106,64 


: put variables 
: above hi-res 
: page 1 











POKE 105,0 
POKE 106,8 


LOMEM at $800 
below hi-res 


End of 
simple 
variables 


$6B 
$6C 


107 
108 


adjusts with 
size of 
variable table 


POKE 107,0 
POKE 108,8 


simple 
variables 
below hi-res 


End of array 
variables 


$6D 
$6E 


109 
110 


adjusts with 
size of 
variable table 


POKE 109,0 
POKE 110,8 


array 
variables 
below hi-res 


End of string 
variables 


$6F 
$70 


111 
112 


adjusts with 
size of string 
table 


POKE 111,0 
POKE 112,32 


strings put 
below hi-res 
page 1 


HIMEM 
beginning of 
string data 


$73 
$74 


115 
116 


top of usable 
memory, low end 
of DOS buffers 


POKE 115,0 
POKE 116,32 


HIMEM at 
$2000, below 
hi-res page 1 
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Listing 1 

100 HOME : PRINT "VARIABLE POINTER CHANGE TEST" 

110 PRIWT : PRINT : INVERSE : PRINT "BEFORE MOVE" : NORMAL 



PRINT : PRINT 



120 

130 

140 

150 

200 

1000 

1005 

1010 

1020 

1030 

1040 

1050 

1090 

1200 

1210 

1220 

1225 

1230 

1232 

1235 

1240 

1250 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 

1370 
1390 
1400 
1410 

1420 
1430 
1440 
1450 
1460 
1465 
1470 



GOSUB 1000: REM 
GOSUB 1300: REM 
GOSUB 1200: REM 
CDSUB 1400: REM 
END 
REM PRINT POINTER IXCATIONS 



PRINT POINTER LOCATIONS 
CHANGE POINTERS 
DECIARE VARIABLES 
RETRIEVE VARIABLES 



PRINT PEEK (103) + 256 
PRINT PEEK (105) + 256 
PRINT PEEK (107) + 256 
PRINT PEEK (109) + 256 
PRINT PEEK (111) + 256 
PRINT PEEK (115) + 256 
RETURN 

REM DECIARE SOME VARIABLES 
A = 3:B = 6:C* » 7 
A$ = "LLLLLLLLLLLL":B$ = 
PRINT : PRINT 
INPUT "NEW STRING?" ;C$ 
PRINT : PRINT 
DIM X(l,l,l) 
PRINT : PRINT : INVERSE 
PRINT : PRINT 
GOSUB 1000 
RETURN 

REM CHANGE POINTERS 
POKE 105,1: POKE 106,8: 
POKE 107,1: POKE 108,8: 
POKE 109,1: POKE 110,8: 
POKE 111,255: POKE 112,31 
POKE 115,255: POKE 116,31 



PEEK (104) 
PEEK (106) 
PEEK (108) 
PEEK (110) 
PEEK (112) 
PEEK (116) 



UUUUUUUUUU" 



PROGRAM BEGINNING" 
tflMEM, VARIABLES START" 
END OF SIMPLE VARIABLES" 
END OF ARRAYS" 
END OF STRINGS" 
HIMEM, START OF STRINGS" 



PRINT "AFTER VARIABLES DEFINED" : NORMAL 



REM LOMEM 

REM SIMPLE VAR END 

REM ARRAYS 

REM STRINGS 

REM HIMEM 



PRINT : PRINT : INVERSE : PRINT "AFTER POINTER CHANGE" : NORMAL : PRINT 
: PRINT 

GOSUB 1000 

RETURN 

REM TEST FOR VARIABLE RETRIEVAL 

PRINT : PRINT : INVERSE : PRINT "VARIABLE RETRIEVAL" : NORMAL : PRINT 
: PRINT 

PRINT "A=";A 

PRINT "B=";B 

PRIWT "C%=",-C% 

PRINT "A$=";A$ 

PRINT "B$=";B$ 

PRINT "C$=";C$ 

RETURN 



you an effective program space of 14K, 
instead of the 6K you would have if you 
used page 1. To use page 2, just use 
HGR2 instead of HGR. 

But there are some problems with 
this method. First of all, you cannot 
use the four lines of text below the 
graphics screen with HGR2. This will 
not be a problem if you are using some 
sort of hi-res character generator like 
the DOS TOOL KIT's HRCG. The 
other problem is that you may want to 
use both of the hi-res pages, say for 
page-flipping. In this case you would be 
back to the original 6K limitation. 

The next method that might be use- 
ful is to relocate the program above the 
hi-res page (or pages). This is done by 
POKEing values into the memory loca- 
tions that Applesoft looks at to see where 
to LOAD or RUN a new program. 
These POKEs must be done before the 
program is loaded or run, say from a 
"hello" program. Here are the POKEs: 



to load above page 1 
POKE 103,1 
POKE 104,64 

POKE 16384,0 : REM A MUST BE 
PLACED IN MEMORY 
JUST AHEAD OF WHERE 
THE PROGRAM WILL 
LOAD 
to load above page 2 
POKE 103,1 
POKE 104,96 
POKE 24576,0 

If the program is loaded above page 
1 you will have about 22K (in a 48K 
system) for the program and variables. 
If you load above page 2, you will have 
about 14K. The 6K of memory below 
page 1 ($800-$2000) will remain unused 
by Applesoft. 

Once you have loaded your program 
above a hi-res page you will probably 
want to figure out some way to use the 
memory that is just sitting empty 
below page 1. Again, there are several 



options. Here are just a few: 

1. You can locate shape tables, 
especially long tables that will not 
fit at location $300, below the hi-res 
page, beginning at $800. The table 
can either be POKEd into that mem- 
ory range or BLOADed at $800. Then 
the pointers at 232 and 233, which 
tell Applesoft the location of the cur- 
rent shape table, should be POKEd to 
point to this location. You could put 
several tables below page 1 and 
change the pointers as the program 
used one or another of the tables. 

2. The DOS TOOL KIT's high- 
resolution character generator 
(HRCG) can be forced to load below 
page 1 by modifying to LOADHRCG 
program from the TOOL KIT. Insert 
the statement ' HIMEM: 8190 ' in 
the LOADHRCG program just before 
the step that says ' PRINT CHR$(4) ; 
"BLOAD RBOOT" '. RBOOT uses 
HIMEM to determine where to load 
the character generator. By giving a 
value of 8190 for HIMEM, the pro- 
gram is fooled into putting the 
character generator below page 1, 
rather than at the top of memory. 
You must insert one more step in the 
LOADHRCG program: ' HIMEM: 
38400 ' is needed to reset HIMEM to 
the top of memory, just below the 
DOS buffers. This step should come 
after the step that reads ' CALL 
ADRS: REM INITIALIZE HRCG'. 
The value you use to reset HIMEM 
will depend on the size of your sys- 
tem; the value given is for a 48K 
Apple. Check the DOS manual for 
the figures for other size systems. 

3. If you are writing a very large pro- 
gram that uses lots of variables, 
especially arrays, you may find that 
the variables will overwrite the 
strings, or vice versa, and then you 
have problems. Applesoft uses a set 
of pointers that tell the program 
where to store variables as they are 
encountered. If you change the 
pointers you can fool the program in- 
to using the memory below page 1 
for variable storage, thus freeing 
room at the top of memory for your 
program. 

See the chart in figure 1 for a more 
complete description of the pointers. 
Here are the POKEs that will cause a 
program loaded above the hi-res area to 
place its variables in the memory be- 
tween $800 and $2000. Note: These 
POKEs must be done before any vari- 
ables are used by the program. 

POKE 105,0 

POKE 106,8 : REM LOMEM AT $800 

POKE 107,0 

POKE 108,8 : REM SIMPLE VARIABLES 
ENTERED AT $800 
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Listing 2 



]RUN LISTING 1 

VARIABLE POIWTER CHANGE TEST 



BEFORE MOVE 



16385 PROGRAM BEGINNING 

17481 LCMEM, VARIABLES START 

17481 END OF SIMPLE VARIABLES 

17481 END OF ARRAYS 

38400 END OF STRINGS 

38400 HIMEM, START OF STRINGS 



AFTER POINTER CHANGE 



16385 PROGRAM BEGINNING 

2049 LOMEM, VARIABLES START 

2049 END OF SIMPLE VARIABLES 

2049 END OF ARRAYS 

8191 END OF STRINGS 

8191 HIMEM, START OF STRINGS 



NEW STRING7ANYSTRING 



AFTER VARIABLES DEFINED 



16385 PROGRAM BEGINNING 

2049 LOMEM, VARIABLES START 

2091 END OF SIMPLE VARIABLES 

2142 END OF ARRAYS 

8182 END OF STRINGS 

8191 HIMEM, START OF STRINGS 



VARIABLE RETRIEVAL 



A=3 

B=6 

C%=7 

A$=LLLLLLLLLLLL 

B$=UUUUUUUUUU 

C$=ANYSTRING 



] 



POKE 109,0 

POKE 1 10,8 : REM ARRAY VARIABLES 
ENTERED AT $800 

POKE 111,0 

POKE 1 12,32 : REM STRINGS ENTERED 
AT $2000 



POKE 115,0 
POKE 116,32 



REM HIMEM AT $2000 



These values are adjusted 
dynamically by Applesoft as variables 
are encountered. This is why many of 
the pointers are set to the same value 
initially. You may want to set the 
pointers differently to allow room 
below hi-res page 1 for some of the 
shape tables or routines that were 
discussed in the first part of the article. 
Play around with the values until you 
can use as much of the Apple's memory 
as possible. 

Listing 1 tests the use of these 
pointers. The program must be loaded 
above one of the hi-res pages, as dis- 
cussed earlier. The program displays 
the pointer values before any manipula- 
tion, after they are lowered, and finally 
after a selection of variables is defined 
by the program. Listing 2 is the output 
of this program. It shows how the 
variable pointers are high, above the 
program, then shift low, below hi-res 
page 1, then adjust with the definition 
of variables. 

Once these values are set this way, 
attempts to add lines to the program 
will result in an "OUT OF MEMORY" 
error, because HIMEM is lower than 
the end of the program. Otherwise, the 
program should run normally and the 
memory manipulations will be trans- 
parent to the user. 

I cannot hope to have covered all 
the tricks that can be used to get the 
most out of your Apple, but I hope that 
the ideas I have put forward will allow 
you to do some exploring and manipu- 
lating on your own. 

References: 

1 . Applesoft Basic Programming Refer- 
ence Manual, Apple Computer Co., 
1978, pp 127, 137, 140. 

2. Lechner and Worth, Beneath Apple 
DOS, Quality Software, 1981, pg. 
8-42. 

3. Wagner, "Assembly Lines, Part 17," 
Softalk, February, 1982. 



Dan Weston is currently teaching a self- 
contained eighth grade in Brooks, Oregon. 
Contact Mr. Weston at 195 23rd NE, 
Salem, OR 97301. 



AlCftO 



Our Current 
Best-Seller 



/AlCftO 

on the Apple 



Volume/ 



INCLUDES I 
DISKETTE | 




$24.95' 



More than 40 new programs on 
diskette to help you get more from 
your Apple: 

• Machine-Language Aids 

• I/O Enhancements 

• Applesoft Aids 

• Graphics and Games 

• Reference Information 

19 choice articles 

43 tested programs on diskette 

(16 sector DOS 3.3 format) 

Volumes 1 & 2 also available at $24.95' 

Together MICRO on the Apple 1, 

2, & 3 provide more than 110 pro- 
grams on diskette for less than 
$1.00 each. No need to type in 
hundreds of lines of code. 

MICRO makes it easy to order: 
Send check (payable to MICRO) to: 

MICRO INK 

P.O. Box 6502 
Chelmsford, MA 01824 

Call our toll-free number: 

1 -800.345-811 2 

(In PA, 1-800-662-2444) 
VISA and MasterCard accepted 

Also available at your local computer store. 

"Add $2.00 shipping per book. 
MA residents add 5%. 
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Atari Character Graphics 
from BASIC, Part 2 



by Paul Swanson 



The author adds fine scrolling to 
his character animation 
program, and introduces 
programming ANTIC'S display 
list. 

Character Graphics II 

requires: 

Atari 400/800 

Last month (53:84) I showed you a very 
simple method for using a custom char- 
acter set in BASIC. The amount of 
memory saved by using character 
graphics instead of map-mode graphics 
is substantial. A mode 7 screen would 
normally use almost 4K of memory. 
Replacing it with character graphics re- 
quires ViK for the character set plus 
about 240 bytes for the 20 x 12 
character screen, for a total of about 
770 bytes. 

Of course, character graphics does 
have its drawbacks. For example, how 
do you move an image across the screen 
without having it "jump" from one 
character position to the next? The nor- 
mal ways to put characters on the 
screen don't offer many alternatives. 
You could invent additional characters 
to mimic the movements. All that in- 
volves a lot of programming and many 
characters for each figure on the screen. 

Are character-graphics screens dedi- 
cated to only those applications where 
nothing on the screen moves unless 
you introduce a player or missile? Are 
they just to display a pretty background 
for your program? 

ANTIC 

Fortunately, you have an Atari com- 
puter. The Atari has not one, but two 
microprocessors you can program. The 
Atari has one processor, a 6502, which 
functions as the "brain" of the system. 
It has another, called ANTIC, that con- 
trols just the screen display. 

ANTIC's language is a machine lan- 
guage, which means it is all numbers, 
but the language is easy to learn 
because there are only a few instruc- 



tions. Its program is called a display 
list. Each instruction does something 
on the screen taken in order from the 
top of the screen to the bottom. 

ANTIC's program usually starts 
with "blank 8 lines" instructions, 
using three of them so that the dis- 
played images are all visible on the 
screen. Televisions are set up with 
"overscan," which means that part of 
the actual picture is off the screen in all 
four directions so that the movies and 
commercials won't have borders 
around them. On the computer, you 
usually want to see the whole screen, 
so the borders are not so annoying. 

Once you have the blank lines out 
of the way, you need an instruction 
called a Load Memory Scan (LMS) in- 
struction, which tells ANTIC where 
the next line is in memory that you 
want displayed. This command is three 
bytes long. The first byte is the LMS in- 
struction and the next two define the 
memory location. 

If you continue using LMS instruc- 
tions for each line on the screen, you 
can put every line on the screen in a dif- 
ferent part of memory. This is not 
usually done. Instead, you can follow 
an LMS instruction with a Mode Line 
instruction, which tells ANTIC to keep 
incrementing the memory "pointer" 
for each consecutive line. 

The last instruction in the display 
list is the "Jump on Vertical Blank" 
(JVBJ instruction. A JVB tells ANTIC to 
wait until the television picture is com- 
pleted, which is the end of a sixtieth-of- 
a-second cycle, then "jump" to the 
location it has in the two bytes that 
follow the JVB. The LMS and the JVB 
are both three-byte instructions. The 
Blank Line and Mode Line instructions 
are both one byte long. 

All of this may mean very little to 
you without an example. To put an ex- 
ample together with the numbers in 
decimal would also mean very little 
because ANTIC interprets them in 
binary. Hexadecimal is a good com- 
promise. In hexadecimal and decimal, 
the following is the program for ANTIC 
that BASIC sets up in response to a 



GRAPHICS 18 statement (mode 2 
without a text window] : 

Hex Decimal Instruction 



70 


112 


Blank 8 lines 


70 


112 




70 


112 




47 


71 


LMS ANTIC 
mode 7, 


XX 


XX 


= BASIC mode 3, 


XX 


XX 


plus 2-byte 
memory location. 


07 


7 


Display ANTIC 
mode 7 


07 


7 




07 


7 




07 


7 




07 


7 




07 


7 




07 


7 




07 


7 




07 


7 




07 


7 




07 


7 




41 


65 


JVB 


XX 


XX 




XX 


XX 





As you can see, the ANTIC numbers 
for the modes are not the same as the 
BASIC numbers for the modes. As you 
become more familiar with display 
lists, you will find that there are more 
modes available than the few that 
BASIC allows. For this example, you 
need to know that BASIC'S mode 2 is 
ANTIC's mode 7. 

So, what has all this to do with 
moving characters around on a 
character-graphics screen? If there is 
nothing more to gain than being able to 
see what ANTIC's program looks like, 
then this looks like a mildly educa- 
tional exercise, right? Read on. 

Fine Scrolling 

ANTIC has a few more little twists 
to it than just displaying normal char- 
acters on the screen, or even modified 
characters. It has fine scrolling capabil- 
ities, both horizontally and vertically. 
To use them, you must set the "mode- 
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line" instruction of each line in the 
display list that corresponds to the line 
you want to be able to scroll. That's 
why you need to know what the display 
list looks like. 

Fine scrolling allows you to move 
the entire character row |or all of the 
rows if you like, which is what the pro- 
gram at the end of this article does) one 
dot at a time horizontally and/or ver- 
tically. Using a combination of fine 
scrolling and moving the entire charac- 
ter a whole character position will 
allow you to move a character display 
smoothly. 

To see how to enable the fine scroll- 
ing function, you must first take apart 
the two instructions that result in a 
line on the display. In hexadecimal, for 
an ANTIC mode 7 display, these in- 
structions are the LMS instruction, 47, 
and the mode-line instruction, 07. In 
binary, these are 0100 0111 and 0000 
0111. Using the numbering that makes 
the leftmost binary digit number 7 and 
the rightmost one number zero, the 
binary digits we want are numbers 4 
and 5. Number 4 enables horizontal 
scrolling: 0101 0111 and 0001 0111. 
Number 5 enables vertical scrolling: 
0110 0111 and 0010 0111. Setting both 
to one enables both: 0111 0111 and 
0011 0111. 

To use these from BASIC, we need 
the decimal equivalent. To enable hori- 
zontal and vertical scrolling, add deci- 
mal 48, which is binary 0011 0000. That 
changes the LMS from 71 to 119 and the 
mode-line instruction from 7 to 55. In 
decimal, the final display list for a 
GRAPHICS 18 screen would be: 112 112 
112 1 19 xx xx 55 55 55 55 55 55 55 55 55 
55 55 65 xx xx, where xx stands for a 
memory location not yet determined. 

Special Memory Locations 

Now that we know what to do with 
the display list, where do we find it? 
There are special memory locations in 
the Atari that can give us, or accept 
from us, all kinds of information. For 
example, locations 560 and 561 contain 
the location of the start of the display 
list. If we declare a GRAPHICS 18 
screen in a program, then set a variable 
to PEEK(560)+PEEK(561)*256, that 
variable will have the location of the 
display list ANTIC is using. You can 
write a new location to 560 and 561 if 
you form one on your own, but it is 
usually easier to just modify the one 
BASIC has already set up. 

In the program, we can find the dis- 
play list, then modify all the instruc- 
tions that display a line on the screen 
by adding 48 to it. That will enable the 
scrolling we want. We also need a few 
other special locations. Two locations 
are required to put the amount of 



1 REM *** Custom Character Set »** 

2 REM *** Program for Part II ttt 

3 REM 

4 REM 

5 REM «** Program by ttt 

6 REM *** Paul S. Swanson »*» 

7 REM 

8 REM 

9 REM Calc. position in mem. 

10 DIM S*C1024) 
20 A=ADR(S*> 

30 B=INT (A/512+1 >*2 
40 CBASE=B*256-A+1 

47 REM 

48 REM 

49 REM Clear S string 

50 SS(1)=CHR*(0) 

60 S*<1024>=CHR*<0) 
70 SS(2)=SS(1> 

77 REM 

78 REM 

79 REM Move standard set down 

80 FOR 1=0 TO 51 1 

90 S* (CBASE+I , CBASE+I > =CHR* (PEEK ( 1+57344) ) 
100 NEXT I 

107 REM 

108 REM 

109 REM Set # to character 

110 FOR 1=24 TO 31 
120 READ N 

1 30 S* ( I +CBASE , I +CB ASE) =CHR* ( N > 
140 NEXT I 

147 REM 

148 REM 

149 REM OR. 2 - No text window 

150 GRAPHICS 18 

157 REM 

158 REM 

159 REM Find Display List 

160 DLIST=PEEK(560) +PEEK (561 ) *256 

162 SLOC=PEEK (DLIST+4) +PEEK (DLIST+5) *256 

167 REM 

168 REM 

169 REM Set scroll enables 

170 POKE DLIST+3,PEEK(DLIST+3)+48 
180 FOR 1=6 TO 16 

190 POKE DLIST+I,PEEK(DLIST+I>+48 
200 NEXT I 

207 REM 

208 REM 

209 REM Initialize position 

210 VP0S=96 
220 HP0S=8O 
222 POKE 756, B 
224 WING=1 

226 S=14 

227 REM 

228 REM 

229 REM Draw character in position 

230 V=INT(VP0S/16> 

232 IF WING=1 THEN SOUND 0,10,0,6 

240 VSCR0L=VP0S-V*16 

250 H=INT(HP0S/8> 

260 HSCR0L=HP0S-H*8 

262 IF WIN6=1 THEN WING=2: SS (CBASE+25, CBASE+25) =CHR* (O) : S* (CBASE+26, 

CBASE+26 > =CH RS ( 23 1 > : GOTO 266 
264 WING=1 : S* (CBASE+25, CBASE+25) =CHR* ( 195) : S* (CBASE+26, CBASE+26) =CHRS (36) 
266 POKE 559,0 

270 POKE SL0C+P,0:P=V*24+H:P0KE SL0C+P,3 
280 POKE 54276, HSCROL 
290 POKE 54277, 15-VSCROL 
292 POKE 559,34 
294 SOUND 0,10,0,2 

297 REM 

298 REM 

299 REM Read Joystick 

300 OLDS=S:S=STICK(0> 
310 IF S=15 THEN S=OLDS 
320 VM0VE=O 

330 HM0VE=0 

340 IF S=9 OR S=13 OR S=5 THEN VH0VE=2 

350 IF S=10 OR S=14 OR S=6 THEN VM0VE=-2 

360 IF S>4 AND S<8 THEN HMOVE=l 

370 IF S>8 AND S<12 THEN HM0VE=-1 

380 IF VMOVE+VPOS>=0 AND VMOvE+VPOS< 191 THEN VP0S=VP0S+VMOvE 

390 IF HM0VE+HP0S>=0 AND HM0VE+HP0S<192 THEN HP0S=HP0S+HM0VE 

400 IF VM0VE=2 THEN WING=2 

410 GOTO 230 

1000 DATA 0,195,36,24,24,36,0,0 
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scrolling we want and one is required to 
turn ANTIC off when we change the 
scrolling values. If we don't turn AN- 
TIC off, we get some very annoying 
"snow" on the screen. Other, less 
predictable things have been reported 
happening when ANTIC was on when 
scrolling values were changed. 

The Program 

It is always easier to see what is 
happening when you have a real exam- 
ple in front of you. Enter the program 
into your Atari so that your reading 
keeps up with the amount you have 
entered. That will make it easer to see 
what's going on. 

Lines 1 through 150 are actually all 
explained in Part 1 . 

Lines 10 through 40 find a ViK 
boundary in the S$ string. Lines 50 
through 70 clear the S$ string to ASCII 
code zeroes. Lines 80 through 100 
move the "built-in" character set 
down (not required for this program). 
Lines 110 through 140 insert the 
special character into the set, and line 
150 declares graphics mode 2 without a 
text window. 

After you have lines 1 through 150 
typed into your Atari, enter through line 
162. Line 160 sets the variable DLIST 



equal to the location where the display 
list created by BASIC starts. Line 162 
looks at the memory location in that 
display list where the screen starts in 
memory. This is required later on. 

From there through line 200, the 
program sets the enable bits on all of 
the ANTIC instructions that display a 
line on the screen. Since you know that 
one will be changed from 71 to 119 and 
the other from 7 to 55, you could use 
the number 119 in line 170 instead of 
PEEK(DLIST + 3)+48 and 55 in line 
190 instead of PEEK(DLIST + I) +48. 
The more generalized form in the pro- 
gram will make it more easily adapt- 
able to other display list applications. 

Moving up to line 224 presents a 
few unusual statements. These state- 
ments initialize everything that didn't 
fit into the above categories. VPOS and 
HPOS are initialized to somewhere in 
the middle of the screen. VPOS and 
HPOS are the vertical and horizontal 
positions — not character positions, 
but the positions in dots — of the figure 
we will be moving. Each character is 16 
dots high and 8 dots wide. Line 222 sets 
the character set base address. This state- 
ment was also used in Part 1. WING 
(line 224) keeps track of which position 
the "wings" are in. S is initialized so 
that the bird will be flying up when the 



main part of the program begins. 

Lines 230 through 260 calculate the 
character position on the screen with 
the remainder from the division deter- 
mining the fine-scrolling amount. 
Since the characters are 16 dots high 
and 8 dots wide in mode 2, these are the 
two values by which we divide. The 
SOUND statement doesn't have any- 
thing to do with the position, exactly. 
It is placed there as a matter of timing 
so that the "wingflapping" noise is in- 
itiated properly. 

Lines 262 and 264 take care of put- 
ting the wings in the correct position, 
alternating by setting WING to 2 if it is 
1 and to 1 if it is 2. Again, the subscripts 
for the S$ string and the values for the 
CHR$ function are explained in Part 1 . 

Finally, we get to where the real ac- 
tion takes place in the program. Line 
266 puts a zero in location 559, which 
turns ANTIC off as soon as it finishes 
the current sweep of the screen. The 
next statement will not need ANTIC 
off, but will function as enough of a 
delay to guarantee that the current 
sweep of the screen is completed before 
the fine scrolling values are POKEd in- 
to the special memory locations. 

Line 270 erases the old position of 
the figure, then calculates the new 
position and puts the figure there. 



TIRED OF TYPING? 

MICRO has the solution. 

Order a diskette of three recent utility pro- 
grams for the Apple. For only $10.00, plus 
$2.00 shipping and handling, you will receive a 
DOS 3.3 diskette containing the source and 
assembled listings of: 

Applesoft Variable Dump by Philippe Francois 
(MICRO, April 1982) 

Straightforward Garbage Collection for the 
Apple by Cornells Bongers (MICRO, August 

1982) 

COMPRESS by Barton Bauers (MICRO, 
October, 1982) 

Please send check, money order, or VISA or 
MasterCard number. Only prepaid orders 
accepted. If you missed the above issues of 
MICRO they can be ordered now! Include $2.50 
for each issue. 

Send orders to: 

Apple Utility Disk 

MICRO 

P.O. Box 6502 

Chelmsford, MA 01824 



"INTERESTING SOFTWARE" 

8781 Troy St. • Spring Valley, CA92077 

(714) 466-2200 



WORLD ALPHABETS 
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Ten type fonts allow user to create text or use pro- 
nunciation tables in Arabic, Cherokee Indian, 
Hieroglyphics, Greek, Hebrew, Japanese, Rus- 
sian, Sanskrit or Roman. Author: W.C. Jones 



Diskette 



$89.95 



BASIC LEARNING 
PACKAGE 

An introduction to the Apple II or II Plus Computer. 
Teaches beginner to program in BASIC. Author: J.J. 
Sudikatus 

Diskette $49.95 

Both require an Apple II with Applesoft, 48K, plus disk 
drive. Epsom pi„vter with Graftrax is optional. 

Apple II or II Plus and Applesoft are trademarks ot Apple Computer, Inc. 
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POSITION statements do not work 
when you enable the scroll because 
ANTIC automatically assumes a "wide 
playfield" instead of a normal one, 
which has 24-character lines instead of 
20-character lines. That is why the for- 
mula P = V*24 + H is required. The 
variable P will be the "old" position for 
the next loop, so that you don't have to 
calculate anything to erase the old 
figure before you POKE the new one 
into place. 

Lines 280 and 290 set the horizontal 
and vertical values into the special 
memory locations reserved for them. 
Note that the vertical scroll value runs 
in the opposite direction and must be 
subtracted from its maximum value, 
15, to get the correct one. When these 
values are POKEd, ANTIC is turned 
back on by POKEing 34 into location 
559, as is done in line 292. Line 294 
stops the "wing-flapping" sound and, 
like line 232, is positioned here for the 
sake of timing the sound. 

Now that we have all of the state- 
ments in place for moving the figure 
around, we need some way to control 
where it moves. I chose the joystick for 
input. It is read at line 300. Line 310 
causes all readings where the stick is in 
the "neutral" position to be ignored. 
These two statements will use the last 
non-neutral position for the direction, 
if the joystick is centered. 



When you move the joystick, lines 
320 through 390 interpret the move- 
ment into the new position by updating 
VPOS and HPOS. The vertical move- 
ments are all 2 dots at a time to com- 
pensate for the difference in the two 
dimensions so that the bird will fly up 
at about the same rate as it will fly 
horizontally. Lines 380 and 390 make 
sure the figure stays on the screen, then 
line 400 goes back to put the figure 
where you just moved it. Line 1000 is 
the character shape for the READ at 
line 120. 

Now you can RUN the program 
and move the figure around the screen 
with your joystick. If you don't have 
a joystick, you should be able to 
figure out how to move it with the four 
arrow keys. 

Notice that the figure does flash a 
little when you move it. This happens 
when you turn ANTIC off. This can be 
limited by decreasing the delay (line 
270) after you turn ANTIC off. Remem- 
ber that line 270 does not require that 
ANTIC be off, so it functions as the 
delay. You can shorten the delay as 
much as you like until you start getting 
snow on the screen when you move the 
figure horizontally. You can do this by 
breaking the line up so that the first 
statement executes before the POKE 
559 statement. This snow is the prob- 
lem you avoid by turning ANTIC off. 



Note that I did include a few state- 
ments in the program that weren't des- 
cribed. These statements are set up to 
cause the bird to flap its wings when it 
is moving horizontally or up (i.e., 
VMOVE does not indicate "down"). 
When the bird moves downward, the 
wings do not flap and the flapping 
sound stops. 

The program is not the most effi- 
cient way to scroll character-graphics 
screens, but it does show the general 
idea of how it is done. You can make 
the program more efficient by doing 
things like replacing the part that reads 
and interprets the joystick with a faster 
routine. You may develop a different 
way of handling the positions from the 
VPOS and HPOS approach. If you keep 
the character position and the scroll 
values separately, you will not need the 
two divisions. If you do it right, you 
can gain some speed there. Remember 
that the program was written to be in- 
structional rather than efficient, so you 
should find many areas where you can 
speed up. 

Play around with the program until 
you get ideas on how to use character 
graphics for your own programming 
project. Your own project will familiar- 
ize you with the advantages of charac- 
ter graphics. Remember, too, that you 
are saving lots of memory. 
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OSI SOFTWARE 



Superboard II 



HEXDOS is a remarkable disk operating system which sur- 
passes the capabilities of OS65D. But because HEXDOS uses 
subroutines in OSI's ROM BASIC, it is very compact (only 2K). 
HEXDOS provides you with easy-to-use commands and saves 
10K of memory and disk space! 

• Load or save BASIC programs, machine language, and data 
files by name. Chain BASIC programs from disk. 

• Up to 22 data files may be open simultaneously. 

• Resides at the beginning of RAM, leaving maximum space 
for user programs. 

• Full trace of BASIC programs with optional single-stepping. 

• True line editing allows you to correct mistakes easily. 

• Supports random-access data files, real-time clock, and tone 
generator. 

• Includes a disassembler and demonstration programs: 
CHECKBOOK and ADDRESSBOOK (personal data base 
management), LIFE, SURROUND, REVERSI, BACKGAM- 
MON, and BSR CONTROLLER (home control). 

• Satisfaction guaranteed, or your money promptly refunded. 

"Documentation is clear and complete, the best I have seen 
from any source." 

- Ronald C. Whitaker, Compute! magazine, April 1981 

Price: $49.50 (5 1 /4-inch diskette and 40-page manual) 



HEX ASM is a powerful macro-assembler which supports 
conditional assembly, linked source files, symbol tables, and 
user-defined macros. Designed to replace OSI's considerably 
less powerful assembler. Also included: a simple editor for text 
files, a utility to renumber BASIC programs, and a disk tester/ 
copier. Requires HEXDOS and 20K RAM. 
Price: $38.50 (diskette and manual) 

TEC65 is an OSI version of DEC's popular TECO editing 
language. TEC65 allows you to perform complex editing tasks 
and major text reorganization with simple command strings. Right 
justification and title centering options for word processing. Re- 
quires HEXDOS. 
Price: $38.50 (diskette and manual) 

FOCAL-65 is an implementation of DEC'S unique pro- 
gramming language. With 9-digit floating-point arithmetic and 
transcendental functions, FOCAL-65 is especially suited for 
mathematical and scientific programs. Easy to learn and pro- 
gram. Requires HEXDOS and 16K RAM. 
Price: $66.00 (diskette and two manuals) 

Your satisfaction guaranteed, or your money promptly and 
completely refunded. For more information, send $1.00 for 
our catalog of OSI, Apple, AIM, KIM, and SYM software. 



The 6502 Program Exchange 

2920 W. Moana, Reno, NV 89509 



MasterCard 



No. 54 - November 1982 



MICRO - The 6502/6809 Journal 



85 



/AlCftO 

Apple Slices 



By Tim Osborn 



This month's column discusses one of 
the fundamental elements of any com- 
puter system, the block move. I also 
present a subroutine to perform block 
moves. If you find yourself saying "but 
the monitor already includes a block- 
move routine," read on; I'll show you 
why you may want to use my block 
move instead. I'll also show you why it 
is sometimes advantageous to use the 
monitor's routine. 

What Is a Block Move? 

A block move is a byte-by-byte 
movement of data from one range of 
memory to another. The area from 
where the data originates is called the 
source and the target area is called the 
destination. The length of the move is 
the difference between the source end 
and the source beginning plus one. The 
distance of the move is the difference 
between the source beginning and the 
destination beginning. 

Let's use the monitor's routine to il- 
lustrate some examples of block moves. 
Type in the following sequence: 

]CALL -151 

(enter the monitor) 
*3000:01 02 03 04 05 06 07 08 

(initialize memory) 
*3000 < 3002.3003M 

(move 3002 - 3003 to 3000 - 3001) 

Now type: 

*3000.3007 
(dump range of memory) 

and receive the following dump: 

3000- 03 04 03 04 05 06 07 08 

Observe that the block move was suc- 
cessful. Now try this: 

*3001 < 3000.3006M 

(move 3000 - 3006 to 3001 - 3007) 
*3000.3007 

(dump range of memory) 

and receive the following dump: 

3000- 03 03 03 03 03 03 03 03 

The computer first moved 3000 to 
3001, then 3001 to 3002, and so on, so 
that the full destination range is filled 
with the same value. 

This situation is called an overlap. 
When the destination is higher than the 



source combined with an overlap, it is 
necessary to move the data starting at 
the source end working toward the 
source beginning, which is called a 
right-move, as opposed to a left-move. 
By doing a right-move in the above 
example and dumping the range of 
memory, the following results would 
be obtained: 

3000- 03 03 04 03 04 05 06 07 

These results are correct. 



A similar problem exists where the 
destination start address is lower than 
the source start address and the two 
ranges overlap. In this case the right- 
move (source-end first) will cause the 
same sort of problems and it is neces- 
sary to use the standard left-move 
(source start first) to avoid these prob- 
lems. When the ranges do not overlap, 
it makes no difference which type of 
move is used, either the right-move or 
the left-move. 
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The Block-Move Routine 

BLOCK-MOVE [listing 1) incor- 
porates the ideas expressed above by 
performing all block moves where the 
destination address is higher than the 
source address with a right-move and 
all moves where the destination ad- 
dress is lower than the source address 
with a left- move. 

To install BLOCK-MOVE you must 
BRUN the object code. The routine 
START will enable the CTRL-Y vector 
by initializing a JMP $310 (the address 
of BLOCK-MOVE's ENTRY routine) 
into $3F8 through $3FA. When the 
monitor encounters a CTRL-Y (control 
key pressed simultaneously with the Y 
key) it will effectively JSR to $3F8. 
After START initializes the CTRL-Y 
vector the monitor will effectively JSR 
to ENTRY upon encountering a CTRL-Y. 

The syntax to use BLOCK-MOVE is 
exactly the same as that to use the 
monitor M command: 

(dest) < (start).(end) 

The [end) statement is then followed 
by a CTRL-Y instead of the usual M. 
When execution reaches ENTRY the 
monitor subroutines have already 
converted: 

1. (dest) to a sixteen-bit integer stored 
at $42 through $43 [A4L through 
A4Hor A4). 

2. (start) to a sixteen-bit integer stored 
at $3C through $3D (AIL through 
A2H or Al). 

3. (end) to a sixteen-bit integer stored 
at $3E through $3F (A21 through 
A2Hor A2). 

All of the above values are in 
modulo-256 form in low-byte, high- 
byte order. A user- written program can 
make use of BLOCK-MOVE by setting 
up the above values and JSRing to 
ENTRY. 

BLOCK-MOVE must first compute 
the distance (DISTL through DISTH, 
$300 through $301) by subtracting Al 
from A4 and storing the results at DIST 
(see lines 54 through 60). After this, 
DIST is added to A2 to obtain the 
destination end address — A5 (lines 61 
through 67). Next destination start is 
compared to the source start in lines 68 
through 76. If the source start is greater 
than the destination start, the 
MOVELT routine is used to perform 
the block move. If the destination start 
is greater than the source start then 
MOVERT routine is used. If the 
destination start is equal to the source 
start then no move is performed and an 
RTS is done at line 74. 

MOVERT takes bytes starting at A2 
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83 








0344 AO 00 


84 MOVERT 


LOT #$00 




0346 Bl 


3E 


85 MOVERT1 


LDA (A2L),Y 


GO FROM OLD END 


0348 91 


44 


86 




STA (A5D,Y 


TO NEW END 


034A C6 


44 


87 




DEC A5L 


DECREMENT DESTINATION POINTER 


034C A9 


FF 


88 




LDA #$FF 




034E C5 44 


89 




CMP A5L 


IF A5L=SFF 


0350 DO 


02 


90 




BNE MOVERT2 




0352 C6 


45 


91 




DEC A5H 


THEN DECREMENT A5H 


0354 C6 


3E 


92 MOVERT2 


DEC A2L 


DECREMENT SOURCE POINTER 


0356 C5 


3E 


93 




CMP A2L 


IF A2L=$FF 


0358 DO 


02 


94 




BNE MOVERT3 




035A C6 


3F 


95 




DEC A2H 


THEN DECREMENT A7H 


035C A5 


44 


96 MOVERT3 


LDA A5L 


SEE IF WE HAVE MOVED 


035E C5 


42 


97 




CMP A4L 


ALL BYTES (A5=A4) 


0360 A5 


45 


98 




LDA A5H 




0362 E5 


43 


99 




SBC A4H 




0364 BO 


EO 


100 




BCS MOVERT1 


NO MUST CONTINUE 


0366 60 




101 




RTS 


ALL DONE 


0367 




102 








0367 




103 


MOVELT 


MOVES THE DATA STARTING AT 


0367 




104 


THE BEGINNING OF THE SOURCE WORKING 


0367 




105 


TOWARDS 


THE END OF THE SOURCE 


0367 




106 








0367 AO 


00 


107 I> 


CVELT 


LOT #$00 


INITIALIZE Y-REG 


0369 Bl 


3C 


108 l> 


CVELT1 


LDA (A1L),Y 


MOVE FROM OLD SOURCE 


036B 91 


42 


109 




STA (A4L),Y 


TO NEW DESTINATION 


036D E6 


3C 


110 




INC AIL 


INCREMENT SOURCE POINTER 


036F DO 


02 


111 




BME M3VELT2 


IF EQUAL TO ZERO 


0371 E6 


3D 


112 




INC All 


THEN INCREMENT HIGH BYTE 


0373 E6 


42 


113 !■ 


CVELT2 


INC A4L 


INCREMENT DEST POINTER 


0375 DO 


02 


114 




BNE M0VELT3 


IF EQUAL TO ZERO 


0377 E6 


43 


115 




INC A4H ; 


THEN INCREMENT HIGH BYTE 


0379 A5 


44 


116 f 


CVELT3 


LDA A5L ; 


CHECK TO SEE IF 


037B C5 


42 


117 




CMP A4L ; 


WE ARE DONE WITH MOVE (A4=A5) 


037D A5 


45 


118 




LDA A5H 




037F E5 


43 


119 




SBC A4H 




0381 BO 


E6 


120 




BCS MOVELTl ; 


NOT DONE, LOOP 


0383 60 




121 




RTS ; 


ELSE RETURN TO CALLER 


0384 




122 




END 





(source end) and moves them to A5 
(destination end). It decrements both 
values moving another byte after each 
decrement until A5 = A4, which 
means the destination pointer is equal 
to the destination beginning. (See lines 
84 through 101.) 

MOVELT takes bytes starting at Al 
(source start) and moves them to A4 
(destination start). It increments both 
values moving another byte after each 
increment until A4 = A5, which 
means that the destination pointer is 
equal to the destination end. (See lines 
107 through 122.) 

Both routines return to the monitor 
(or user- written program) when they 



have completed their task. Experiment 
with BLOCK-MOVE and the monitor 
move command to get a feel for the dif- 
ferences between the two routines. 

The advantage of using the monitor 
subroutine is that it allows you to in- 
itialize memory to desired patterns of 
byte values. It can be very handy, for 
instance, to initialize ranges of 
memory to binary zeros, but it is not 
limited to that. All sorts of patterns can 
be created depending upon the nature 
of the overlap. For those times when 
you are moving data forward with 
overlapping ranges of memory, use 
BLOCK-MOVE. 

AlCftO 
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Reviews in Brief 



Product Name: The Programmable Cube 

Equip, req'd: Apple II with 48K or 64K and DOS 3.3 

Price: $34.95 includes diskette and extensive 

documentation 
Manufacturer: Metacomet Software 

P.O. Box 31337 

Hartford, CT 06103 
Description: This program will solve a Rubik's cube. 
"Cube" will scramble a cube and solve it for you. It also 
has an option to make designs and patterns. It is easy to 
use and relies on standard cube notation for entering moves. 

Pluses: The Programmable Cube comes with an extensive 
user's guide to teach how to write programs to make 
designs or even solve cubes based on your own cube-solving 
strategy. It has a "mirror" behind the graphics cube to 
show the obverse sides of the cube. The program also in- 
cludes simulated rotation of the cube as moves are made. 
You can enter a cube of your choice or choose the order of 
the colors on the cube. 

Minuses: The language, while not difficult to learn, is 
similar to many of the graphics-control programs and 
takes a fair amount of time to become familiar with it. 

Skill level required: Ability to follow directions is needed 
to run the solving portion. Previous programming ex- 
perience in any language would be a help to program in 
cube language. 

Reviewer: Phil Daley 



Product Name: Ghost Gobbler 

Equip, req'd: TRS-80 Color Computer with 16K 

Price: $21.95/cassette ; $24.95/disk 

Manufacturer: Spectral Associates 

141 Harvard Ave. 

Tacoma, WA 98466 
Description: Ghost Gobbler is Spectral Associates' version 
of the popular arcade game, PAC-MAN. Using a joystick, 
you control a gobbler that travels around a maze eating 
dots. You must be wary of the four ghosts that also fre- 
quent the maze. If they catch you, you will be eaten. Your 
only protection is to eat an "energizer" dot, whereupon 
you can score points by gobbling the ghosts. There are 
17+ screens, and extra points can be gained by gobbling 
bonus shapes. Extra men can be gained by scoring high. 

Pluses: The game is in 6809 machine language, and comes 
on cassette. The program will load onto disk and execute 
properly from disk once loaded. The game is fast action, 
and operates smoothly in all skill levels. A teleportation 
spot allows the player to quickly escape to another section 
of the board. Sixteen skill levels are available, so novices 
and experts can compete on a more even scale. 

Minuses: The game supports only one player at a time, 
though it does keep records of the ten highest scorers. It 
operates as a linear device rather than a switch type. Many 



users complain of the joystick action at first, but practice 
does improve its action. 

Documentation: A single sheet instruction. 

Skill level required: Anyone who can handle a joystick can 
play the game, but expert skills are required to get past the 
first two or three screens. 

Reviewer: John Steiner 



Product Name: 
Equip, req'd: 

Price: 
Manufacturer: 



Speed Reader 

Apple II with Applesoft in ROM and 

DOS 3.3 

$ 

Special Delivery Software 

10260 Bandley Drive 

Cupertino, CA 95014 
Description: Speed Reader is a five-part reading program 
designed to improve comprehension and increase reading 
speed through the development of concentration, atten- 
tion span, and more effective eye movement. Two copies 
of the Speed Reader Master Program diskettes, one copy of 
the Speed Reader Data diskette, and an easy-to-read 
manual are included in the software package. The main 
menu has five lessons: warm-up excercise (letters), warm- 
up exercise (words), eye movement exercise, column 
reading lesson, and reading passage lesson. 

Pluses: The manual contains charts for each lesson on 
which progress can be recorded; user's scores are provided 
after each activity is completed. Several reading selections 
are offered in Lessons 3, 4, and 5, most of which are in- 
formative and interesting. You can increase reading speed, 
change column justification, and decrease window size in 
Lessons 3, 4, and 5. 

Minuses: Vocabulary level and topics of several selections 
are beyond that of an average fifth-grade student. It is not 
clear to the user whether the RETURN key should be used 
to continue the program; no editing is permitted and selec- 
tions cannot be added to the disk. Only one user can use 
Speed Reader-, booting the diskette will not provide several 
users with the program. 

Skill Level Required: Grades five through adult; private in- 
struction. Spelling proficiency is a must as well as typing 
skills. 

Reviewer: Cathy LaSalle 



Product Name: GR2716 ROM/EPROM Emulator 

Equip, req'd: Not applicable 

Price: $78.00 

Manufacturer: Greenwich Instruments Limited 

U.S. Distributor: LMS Electronics 

3401 Monroe Road 

Charlotte, NC 28205 
Description: The GR2716 EPROM Emulator is a pin-for- 
pin replacement of the 2716 EPROM for use during system 
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development. The device consists of RAM memory and a 
lithium power cell housed in a 24-pin package about .6 in- 
ches high. When used in the read mode, the device is plug- 
ged into a normal system EPROM socket, and functions 
exactly like an EPROM. Connectors with leads are sup- 
plied also. The package is provided with three additional 
wirewrap connections on the end between pins 1 and 24. 
Two of these pins are connected to the system reset to pre- 
vent inadvertent writing to the memory during system 
restart. When the third pin, labeled WE, is connected to a 
normal system static-write enable signal, it causes the cir- 
cuit to function as a static RAM chip. The battery is 
guaranteed to retain memory for three years, with ten 
years quoted as typical. Other versions are available to 
replace other EPROMS. 

Pluses: This processor performs exactly as specified. The 
documentation is terse, but adequate. New literature has 
come out since this review. Sample WE circuits are given 
for several CPUs. 

Minuses: The legs appear fragile and could be broken easily. 
The problem can be circumvented by installing the 
GR2716 into a 24-pin soldertail socket and then plugging 
the entire assembly into the system. One other minor 
problem is the placement of the WE and Reset pins on the 
end of the device. There have been fit problems on crowded 
boards, but the chip-in- a-socket approach also solved this 
problem by raising the chip above board level. 

Skill level required: Reasonably serious hardware and 
machine-language system software developer. 



Reviewer: Wayne D. Smith 



Product Name: Telewriter (disk version) 

Equip, req'd: TRS-80C, 16K, RS disk system, 

printer 
Price: $49.95 cassette, $59.95 disk 

Manufacturer: Cognitec 

704 Nob Ave. 

Del Mar, CA 92014 

(714) 755-1258 
Description: Telewriter is a word processor for the TRS- 
80C. The editor features a cursor-oriented, 51- x 
24-character display with real lower-case characters. The 
graphics screen is used for text display, and provides a 
much greater area of visible text than most color computer 
word processors. 

Pluses: Telewriter is one of the better editors I have seen. 
Many features, including embedded printer commands, 
not found on more expensive processors, are available in 
Telewriter. 

Minuses: Requires a disk I/O program on disks. The 
binary file format adds extra steps when using Telewriter 
with an ASCII file. Neither horizontal scrolling nor right 
justification is supported. 

Documentation: Seventy pages of well-written reference 
material are included. 

Skill level required: No previous experience with word 
processors is required. 



The watch is quiet. Scanners 
show nothing of rebel activity as you comb 

QUADRANT 



Suddenly, a stargate gapes open. A lone rebel 

ship surges into space. More alien 

comrades follow in attack. You 

must hold the Quadrant 

From the invaders. 

And you must 

doit alone! 



Reviewer: John Steiner 



JMCftO 



You're combing the quadrant, defending your turf, 
and suddenly, as if from nowhere, an alien ship 
appears. You spin and shoot, lazers blazing and 
blast him into oblivion, with more attackers soon 
to follow. The battle continues and you gain the 
upper hand. Just when you think you've got 
things under control, the alien commander ap- 
pears. He's extremely fast and a very good shot, 
but you have a secret weapon, HEAT SEEKERS! 
The flick of a finger destroys every alien in your 
guadrant. With a few seconds rest you prepare 
yourself for the next wave of alien attack ships. 
GET READY, HERE THEY COME.. .FIRE! 

Get Quadrant 6112 from your favorite dealer or 
directly from Sensible Software for only . .34.95 

(Game Paddle Required) 

^ Sensible Software 

6619 Perham Drive, 
West Bloomfield, MI 48033 
' Phone (313) 399-8877 



Designates u.. 
Copyriqlr 



i rademarks 
982 Sens 



)f sensible software 
ile Software Inc. 
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II 



RS-BO 



IBM-PC 



HOW TO WRITE AN APPLE 




CC 


m 
p 

* 


1' ■ 


^JP* 


6 




1 


^r 




<£ 


» 


f *"«% 


1 « i 




■fH*"-* 


LU 




1 

1 :tm 


1 


i— 


'- 


■ S*!mP^ 



■-o>- 



- U=J 



3 exceptional books join the DATAMOST library. 



Here is a series of easy to read, easy to ■ -wonder why you were ever intimidated 
use, easy": to "understand Books," which - by the thought of programming! 



programs on your computer. And y< 



nair:«'»-«ti. 



material which has no interest for you, 
because there are three specific volumes. 
One for the Apple,* one for the IBM-PCr 
and one for the TRS-80* 
In each of these books author Ed Faulk 
leads you through your favorite com- 
puter and takes. the mystery out of writing 
programs for it. As you proceed, interest- 
ing chapter by interesting chapter, you'll 



'Apple is a trademark of Apple Computer. Inc., IBM-PC is a trademart 
VISAMASTERCHARGE accepted. $2.00 shipping/handling charge. 



really want HOW TO WRITE A PRO- 
GRAM. Before you're past Chapter 2 
you'll be programming. By the end of the 
book you'll be willing to tackle business 
programs, personal use programs and 
even games and adventures! $14.95 
Get your copy now. Available at computer 
and book stores, or: 

fc] DATAMOST (213)7091202 

9748 Cozycroft Ave., Chatsworth, CA 9131 1 

; of IBM Corp. -TRS-80 is a trademark of Tandy Corp 
(California residents add 6Vv.% sales tax.) 



Reston Publishing Con 
A Prentice-Hall Compa 
Reston, Virginia 
Toll free (800) 336-033" 



mnnsiER mflSH 





The Software Farm 
3901 So. Elkhart 
Aurora, CO. 80014 
PH: (303) 690-7559 



It is late at night in a monster infested graveyard and you have been 
given the job of keeping the monsters in. All you have between you and 
complete chaos is a new MonsterMasher System and quick reflexes. 

Monster Mash is an original and unique arcade action game written in 
assembly language for the Apple II and Apple /// (in emulation mode). 



$29.95 
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$29.95 for the Apple II* 
At computer stores, or: 



by Bob Bishop 




9748 Cozycroft Ave., Chatsworth, CA 91311 . (213) 709-1202 



VISA/MASTERCARD accepted. $2.Q0shippins/har^if«dW»3e.: 
(California residents add 6n% sales tax.) 
•Apple II is a trademark of Apple Computer, Inc. 



Getting Around the Apple 
Hi-Res Graphics Page 



by Eagle I. Berns 



This article describes a method 
to split an Applesoft BASIC 
program in order to make 
available the core both above 
and below the hi-res pages. This 
allows the program to utilize the 
graphics area without having to 
sacrifice portions of memory. 



GETTING 

requires: 

Apple II with 32K 
RENUMBER 



If your Apple II has 48K of memory, and 
you write a program that starts at 
$0800 (hex) and goes to, say, $4100, 
you may notice that though there's still 
a lot of core available for your program, 
you have lost the ability to use either of 
the hi-res graphics pages (the first runs 
from 2000 to 3FFF and the second from 
$4000 to $5FFF). When this problem 
came up for me, I wondered if there 
might be some way to have my pro- 
gram bridge the gap over either or both 
the graphics areas and continue on the 
other side. 

In reading current literature I found 
various references to ways in which 
this could be done. However, they all 
required multiple steps and patching 
source statements. What I wanted was 
an automatic process. There are several 
EXEC files used in the process I even- 
tually developed, but the user of the 
program need only issue the one com- 
mand "RUN SPLIT", and the rest of 
the process is automatic. 

The EXEC files and utility program 
needed to do the job are listed at the 
end of this article. First, however, I will 
give a general description of how the 
task is accomplished, and then a detailed 
description of the program itself. 

Basically, the statements of the 
Applesoft program to be split are scanned 
via their internal pointer links from 
statement to statement, until the last 



statement before location $2000 is 
reached. At this point a number of 
dummy statements are inserted. (This 
version uses the &Renumber utility 
from the Apple II tool kit to renumber 
the program in a way that allows the in- 
sertion of a number of dummy state- 
ments. A simple modification is neces- 
sary if some other renumber utility is 
used.) The utility then proceeds to find 
the link that exists between the loca- 
tion before $2000, and the location 



directly after $4000. It then finds the 
places to POKE, relinking the program 
across the dummy statements (where 
the graphics area is located). Since a 
LOAD will reset all links, the two 
POKEs must be a part of the original 
program. Also, since the POKEs must 
be there when the split is complete, 
they must be inserted before we begin 
the split, so as not to destroy the 
relative positioning of statements in 
the program. 



Listing 1: SPLIT 



100 
110 



HOME 
"ENTER NAME OF PROGRAM TO SPLIT" : 



PRINT : PRINT : HTAB '( 7 ) : INPUT 



TEXT : 

PRINT 

A$ 

PRINT 

PRINT "ENTER L0MEM ADDRESS FOR UDADING PROGRAM": PRINT : PRINT : HTAB 

(7) : INPUT L 

PRINT : PRINT "ENTER 1 IF SPLITTING OVER 4GR1 , " 

PRINT " 2 IF SPLITTING OVER HGR2," 

PRINT " IF SPLITTING OVER BOTH." 

PRINT : PRINT "VHICH "; : INPUT S 
180 A = INT (L / 256) 
190 B = L - A * 256 
200 REM 

POKE 210, B: REM SAVE LOMEM 

POKE 211, A 

REM 

REM SET SPLIT BOUNDS. 

REM 212 HOUS START OF PAGE 

REM 213 HOLDS LENGTH 

REM 771 HOIDS LENGTH 

REM 

IF S = 1 THEN 320 

IF S = 2 THEN 330 

IF S = THEN 340 

GOTO 140 

POKE 212,32: POKE 213,32: GOTO 360 

POKE 212,64: POKE 213,32: GOTO 360 

POKE 212,32: POKE 213,64 

REM 

360 DS = CHR$ (4) 
370 PRINT DS; "OPEN SPL.SETUP" 

PRINT D$; "DELETE SPL.SETUP" 

PRINT D$;"OPEN SPL.SETUP" 

PRINT D$; "WRITE SPL.SETUP" 

PRINT "FP" 



120 
130 

140 
150 
160 
170 



210 
220 
230 
240 
250 
251 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 



380 
390 
400 
410 
420 
422 
424 
426 
430 
440 
450 
460 
470 
480 
490 



PRINT "RUN LOADAPA" 

PRINT "POKE 103, ";B + 1 

PRINT "POKE 104, ";A 

PRINT "POKE ";B;",0" 

PRINT "LOAD ";A$ 

PRINT "SR 2,1" 

PRINT "1 POKE 0000,000:POKE 0000,00" 

PRINT "SAVE SPLITPROG" 

PRINT "EXEC SPL. FINDER" 

PRINT DS; "CLOSE SPL.SETUP" 

PRINT D$;"EXEC SPL.SETUP" 
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When the RUN SPLIT command is 
issued, you see the following: 

ENTER THE NAME OF THE PRO- 
GRAM TO SPLIT 
< type in the name > 

ENTER LOMEM ADDRESS FOR 
LOADING PROGRAM 
<Normally this is 2048 (or $0800], but 
you may change this, if you like > 

ENTER 1 IF SPLITTING OVER HGR1 
2 IF SPLITTING OVER HGR2 
IF SPLITTING OVER BOTH 

WHICH: <your choice depending on 
your needs > 



modifications since SPLITPROG does 
not accept modifications gracefully. 

Now I will present the programs and 
support utilities, with a description of 
their execution sequence. 



SPLIT Description 



Lines 180-350 are POKEd away for 
the rest of the utilities to use. Loc's 210 
and 211 are for program start-up loca- 
tion,- 212 and 213 are the addresses for 
the boundaries of the split. 

Lines 370-400 and 580-590 create 
and execute SPL. SETUP, which does 
the following: 



LOAD < program > < loads the 
program > 

&.R 2, 1 < renumbers to 

allow a dummy 
line 1 to be 
inserted that will 
be modified > 

1 POKE 0000,000:POKE 0000,00 

SAVE SPLITPROG <this will 
eventually 
become the split 
program > 



EXEC SPL.FINDER 



<goes off to find 
where to split > 



Then wait as your screen goes 
through some contortions, writing 
messages, etc. Finally it will write out: 
END OF JOB. A program called SPLIT- 
PROG will have been created which, 
when run, will not be interfered with if 
hi-res graphics are used. Be sure to hold 
on to the original program for making 



FP 

RUN LOADAPA 



< cleans things 
up a bit > 

< from Apple II 
Tool Kit> 



POKE 103, <addrl > <set up LOMEM 
POKE 104, <addr> for loading the 
POKE <loc>,0 user program to 
be split > 



Listing 2: SPLIT FINDER 

63980 1=1+ PEEK (210) + PEEK (211) * 256 

63981 J = PEEK (I + 1) 

63982 IF J = PEEK (212) THEN 63987 

63983 M = 1:1 = J * 256 + PEEK (I) 

63984 IF I <> THEN 63981 

63985 PRINT "PROGRAM DOES NOT REACH HIOT-RES PAGE" 

63986 END 

63987 POKE 208, PEEK (M + 2): POKE 209, PEEK (M + 3) 

63988 POKE 103, 1: POKE 104, 8: POKE 2048, 

63989 PRINT CHR$(4);"RUN SPL.EXEC MAKER" 
RUN 63980 



Listing 3: SPLIT EXEC MAKER 

5 Y = 36 

6 IF PEEK (213) = 64 THEN Y = 72 

7 Z = PEEK (209) * 256 + PEEK (208) 

8 DS = CHR$ (4) 

9 PRINT D$;"OPEN TEMPEXEC" 
10 
20 
30 
31 
32 
33 
34 
35 
36 
37 
40 
50 



60 

65 
70 
80 



PRINT DS; "DELETE TEMPEXEC" 

PRINT D$;"OPEN TEMPEXEC" 

PRINT D$; "WRITE TEMPEXEC" 

PRINT "POKE 103,PEEK(210)+1" 

PRINT "POKE 104,PEEK(211)" 

PRINT "POKE (PEEK(210)+256*PEEK(211)),0" 

PRINT "LOAD SPLITPROG" 

PRINT "S.R ";Z + 3 + Y;",1,";Z 

PRINT Z;" GOTO ";Z + 3 + Y 

PRINT Z + 1;" REM SPLIT" 

FDR I=Z + 2TOZ + 2 + Y 

PRINT I;" REM SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT S 
PLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPL 
IT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT SPLIT 
SPLIT SPLIT SPLIT SPLIT SPLI" 

NEXT I 

PRINT "EXEC SPL.PATCHER" 

PRINT DS; "CLOSE TEMPEXEC" 

PRINT D$;"EXEC TEMPEXEC" 



SPL.FINDER Description 



The EXEC is copied to the end of 
the user program and then that part is 
executed. 

Lines 63980-63984 scan the pro- 
gram to be split to find the statement 
just preceding the hi-res page beginning. 

Lines 63984-63986: if the program 
isn't large enough to require splitting, 
we stop here. 

Lines 63987-63988 POKE away the 
statement number detected for later use. 

Line 63989 invokes the next phase, 
which does the actual splitting process. 



SPL.EXEC MAKER Description 



Lines 5-6 compute the number of 
dummy REM SPLIT statements to be 
inserted to cover the appropriate 
graphics area. 

Line 7 retrieves the line number 
where the split starts. 

Lines 8-80 create and execute 
TEMPEXEC, which performs the 
following functions upon invocation: 

Lines 31-34 set up the appropriate 
LOMEM value and then load 
SPLITPROG. 

Line 35 renumbers the program to 
allow insertion of the REM split 
statements. 

Line 36 adds a GOTO statement 
around the REMs so they can't be 
executed. 

Lines 37-60 add the dummy REM 
statements. 

Line 65 EXECs the final phase of the 
splitting process, which creates the ap- 
propriate POKE for line 1 to relink the 
final program execution. 
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J2) THEN 63976 



Listing 4: SPLIT PATCHER 

63970 1=1+ PEEK (210) + 256 * PEEK (211) 

63971 Jl = PEEK (208) :J2 = PEEK (209) 

63972 IF ( PEEK (I + 2) = Jl) AND ( PEEK (I + 3) 

63973 I = PEEK (I) + PEEK (I + 1) * 256:M = I 

63975 GOTO 63972 

63976 K = M 

63977 J = PEEK (M + 1) 

63978 IF J = ( PEEK (212) + PEEK (213)) THEN 63981 

63979 M = J * 256 + PEEK (M) 

63980 GOTO 63977 

63931 PRINT CHR$ (4); "OPEN TEMPEXEC" 

63982 PRINT G-JR$ (4) :''DEIZTE TEMPEXEC 11 

63983 PRINT CHR$ (4); "OPEN TEMPEXEC" 

63984 PRINT CHR$ (4); "WRITE TEMPEXEC" 

63985 PRINT "1 POKE ";K;","; 

63986 L = PEEK (M) : J = 2: IF L > 9 THEN J = 1 : IF L > 99 THEN 63988 

63987 PRINT LEFT$ ("000", J); 

63988 PRINT L;": POKE ";K + 1;","; PEEK (M + 1) 

63989 PRINT "PRINT CHR$(4);"; CHR$ (34) ; "DEOZTE SPL.SETOP"; CHR$ (34) 

63990 PRINT "DEL 63970,63995" 

63991 PRINT "SAVE SPLITPROG" 

63992 PRINT "PRINT "; CHR$ (34);"END OF JOB"; CHR$ (34) 

63993 PRINT "PRINT CTR$(4) ;"; CHR$ (34) ; "DELETE TEMPEXEC"; CHR$ (34) 

63994 PRINT CHR$ (4); "CLOSE TEMPEXEC" 

63995 PRINT CHR$ (4);"EXEC TEMPEXEC" 
RUN 63970 



SPL.PATCHER Description 

The EXEC is copied to the end of 
the user program and then that part is 
executed. 



Lines 63970-63980 compute the ac- 
tual machine addresses before and after 
the split, which must be modified to 
relink the program. 



Lines 63981-63995 create and EXEC 
TEMPEXEC, which does the following: 

Lines 63985-63988 replace the 
initial dummy POKE with the ap- 
propriate POKE for relinking the 
program. 

Lines 63989-63993 clean up 
some of the garbage left by the pro- 
cess, save the final SPLITPROG, and 
print the "END OF JOB" message. 

As you can see, a lot goes on, and a 
number of EXEC files are executed. 
This is mainly for the purpose of mak- 
ing the entire process automatic. 1 
welcome any changes or modifications 
that would streamline the process. 



Mr. Berns has been involved in computing 
since 1959, working on large-scale 
computer systems as a systems analyst/ 
programmer. He has written both the 
BASIC compiler and interpreter and the 
LISP system for Stanford University where 
he has been employed for the past 14 
years. He may be contacted at 735 La Para 
Ave., Palo Alto, CA 94306. 

JMCftO 



Model EP-2A-79 

EPROM Programmer 




Three years in the field with unsurpassed performance. Software is available for 
the EP-2A-79 for most all of the microcomputers including the popular CP/M, 
FLEX. HDOS operating systems. Wnte or call for specific hardware/software inter- 
facing. Driver packages available for F-8, 6800. 6809, 8080,8085, Z-80, 1802, 
6502 and 2650 based systems. 



EP-2A-79 115V 50/60 HZ 






....$169.00 


PM-0 TMS2708 


Personalit 

$17.00 


y Modules 

PM-5 

PM-SE 

PM-8 

PM-9 

SA-64-2 

SA-64-3 


2716 2758 


$17.00 


PM-1 2704,2708 .... 


17.00 


2816 

MCM68764 

2764 

TMS2564 


. ... 35.00 


PM 2 2732 

PM-2A 2732A 

PM-3 TMS2716 


33.00 

33.00 

1700 


35.00 

35.00 

39.00 


PM-4 TMS2532 


33.00 


2764 


39.00 



Optimal Technology, Inc. 

Phone (804) 973-5482 
Blue Wood 127 Earlysville, VA 22936 



QCB-9 SINGLE BOARD COMPUTER 



• 6809 BASED 

• RUNS TSC FLEX DOS 

• QCB-9/1 S-100 BUS 

• QCB-9/2 SS-50 BUS 




$149.00 

•PARTIAL KIT 

FEATURES 

• 5'A" Floppy Controller 

• Serial RS-232 Port 

• Centronics Type Printer Port 

• Keyboard /Parallel Port 

• 24K Bytes ol Memory 

• QBUG Resident Monitor 

• 6802 Adaptor 

FULLY ASSEMBLED 

& TESTED $389.00 

• 48-hour Burn-in 

• 90 Day Warranty 



6809 CPU CARD 



NAKED-09 SS-50 

* 1K0FRAM ATE400 Assembled & Tested $149.00 

* 6K OF EPROM AT E800-FFFF 2 MHZ Version $189.00 

* HIGH DUALITY 00UBLE SI0E0 PCB * SOLDER MASKED * SILK SCREENED 



$49.95* 

PCB & 

Documentation 

Only 



TSC, FLEX DOS, ASSEMBLER, EDITOR 



$150.00 



QBUG RESIDENT MONITOR 



$50.00 



* Disc Boot * Memory Test * Break Points 

* Memory Exam & Exchange * Zero Memory * Jump to User Program 

* Memory Oump * Fill Memory * Register Display & Change 

QBUG IS A TRADEMARK OF LOGICAL DEVICES INC., ' Copyright. 1981 

PHONE ORDERS: (305) 776-S87Q 

LOGICAL DEVICES INC. 

COMPUTER PRODUCTS DIVISION 
781 W. OAKLAND PARK BLVD. • FT. LAUDERDALE, FL 33311 

TWX: 510-955.9496 • WE ACCEPT VISA, MC, CHECKS, C.O.D., MONEY ORDER 
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Extra Colors for the Atari 



by Richard I. and Donna M. Marmor 



1 ! 



Two techniques are presented to 
achieve extra colors on the Atari 
screen. One uses alternating 
adjacent dots of different colors, 
while the other uses alternating 
displays of different colors. 

Extra Colors 

requires: 

Atari 400/800 (8K) 

Atari graphics modes are limited in the 
number of colors that can be displayed 
at any one time. In Mode 7, for exam- 
ple, only four colors can be used. There 
are many techniques available that will 
expand your choices. In this article we 
describe two of them and provide sam- 
ple program illustrations. 

Color Dot Mixing 

With this technique you place pix- 
els of different colors next to one 
another in an alternating pattern. For 
instance, a red pixel followed by a blue 
pixel followed by a red pixel, and so on. 
In a relatively large bounded area, such 
as a square, the overall perceived shade 
is distinct from the individual colors 
comprising the pattern. Using this ap- 
proach, the number of distinct colors in 
Mode 7 expands to 10: primary colors 
1, 2, 3, and 4; and the "mixed" colors 
1-2, 1-3, 1-4, 2-3, 2-4, and 3-4. Of 
course, you must make a judicious 
choice of the four primary colors so 
that the mixed colors will look good 
and appear distinct. 

Program 1 will help in your explora- 
tion of Color Dot Mixing. It places two 
sets of two squares on a Mode 7 screen, 
one against a white background and 
one against a black background. The 
program then asks you to type in a pair 
of color- luminance combinations. It 
colors a square in each set with each 
color you chose, and then shows you 
the result of the mix in a square directly 
below. Why are there two sets of 
squares? Since colors look different 



Listing 1 



1 REM * (PROGRAM 1** 

2 REM 

3 REM ILLUSTRATES COLOR DOT MIXING 

4 REM YOU INPUT THE COLORS YOU WANT 

5 REM THE PR06RAM THEN DISPLAYS THEM 

6 REM AND MIXE9 THEM FOR YOU- 

7 REM AGAINST A WHITE AND BLACK BACKGROUND 

8 REM 

10 GRAPHICS 7 

20 SETCOLOR 0,0, 14i COLOR 1 

30 FOR 1-80 TO 159 STEP 1 

40 PLOT I,0iDRAWTO I,79iNEXT I 

50 PLOT 10, 10 

60 DRAWTO 20.10IDRAWTO 20,20aDRAWTO 10,20: DRAWTO 10,10 

70 PLOT 30, 10 

80 DRAWTO 40, 10IDRAWTO 40,20:DRAWTO 30,20sDRAWTO 30,10 

90 PLOT 20,30 

100 DRAWTO 30, 301 DRAWTO 30, 40» DRAWTO 20, 40: DRAWTO 20,30 

110 COLOR 

120 PLOT 90, 10 

130 DRAWTO 100, 101 DRAWTO 100, 201 DRAWTO 90, 20: DRAWTO 90,10 

140 PLOT 110,10 

150 DRAWTO 120,10iDRAWTO 120,20:DRAWTO 1 10, 20: DRAWTO 110,10 

160 PLOT 100,30 

170 DRAWTO 110, 301 DRAWTO 1 10,401 DRAWTO 100,40: DRAWTO 100,30 

180 COLOR 2 

190 FOR 1 = 11 TO 19 STEP 1 

200 PLOT I , 1 1 i DRAWTO 1,19 

210 PLOT I+80,lliDRAWTO 1+80,19 

220 NEXT I 

230 FOR 1-21 TO 29 STEP 2 

240 FOR J=31 TO 39 STEP 2 

250 PLOT I, J I PLOT 1+80, J 

260 NEXT J i NEXT I 

262 FOR 1=22 TO 29 STEP 2 

264 FOR J-32 TO 39 STEP 2 

266 PLOT I, J i PLOT 1+80, J 

268 NEXT J I NEXT I 

270 COLOR 3 

280 FOR 1-31 TO 39 STEP 1 

290 PLOT I.lliDRAWTO 1,19 

300 PLOT 1+80, 11 1 DRAWTO 1+80,19 

310 NEXT I 

320 FOR 1-22 TO 29 STEP 2 

330 FOR J-31 TO 39 STEP 2 

340 PLOT I, J I PLOT 1+80, J 

350 NEXT J: NEXT I 

352 FOR 1=21 TO 29 STEP 2 

354 FOR J =32 TO 39 STEP 2 

356 PLOT I, J I PLOT 1+80, J 

358 NEXT J I NEXT I 

360 PRINT "First color (0-15), lum<0-14 even)" 

370 INPUT CF.LF 

380 PRINT "Second color (0-15), lum<0-14 eve 

390 INPUT CS.LS 

400 SETCOLOR 1,CF,LF 

410 SETCOLOR 2,CS,LS 

420 PRINT j PRINT : PRINT 

430 PRINT "First: Color=";CF5" Lum=";LF 

440 PRINT "Second: Color=";CS;" Lum=";LS 

450 GOTO 360 
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against different background colors, we 
decided to experiment with different 
backgrounds. 

You can easily modify this program 
to further enlarge the technique. Why 
not mix more than two colors? Or how 
about different cycles; one red pixel 
followed by two blue pixels, for exam- 
ple? Try background colors other than 
black and white. You'll really see the 
difference! 

The possibilities from color dot 
mixing are great and they are suitable 
for many applications. The resulting 
colors, however, appear rather coarse to 
the eye. The next technique uses dis- 
play list interrupts to create new colors 
that are much purer and far more pleas- 
ing to the eye. 

Color Dot Alternation 

To understand this technique, we 
must first review some Atari display 
theory. When you look at a display on 
your television or monitor, it appears 
almost as if the display is painted on 
the screen. Actually, the display is be- 
ing regenerated by ANTIC, 60 times per 
second. But this is so fast that you 
don't see the resulting flicker. 

An explanation of the display list 
and display list interrupts appears in 
many places, so we won't go into that 
in great detail: just enough to give a 
frame of reference. Every 60th of a sec- 
ond [or frame), ANTIC goes through its 
display list and associated display 
memory, retrieving the color register 
number for a given pixel from display 
memory and displaying the pixel at the 
correct point on the screen in the color 
specified in the appropriate color regis- 
ter. What would happen if, on alternate 
frames, different colors were displayed 
for the same pixel? During frame 1, for 
instance, the color of a pixel might be 
red. During frame 2, it might be blue. 
During frame 3, it would go back to 
red, and so on. The result, according to 
color wheel theory, is that the pixel 
should appear purple. And indeed it 
does. If you kept track which pixels of 
your display should be pure red, which 
should be pure blue, and which should 
be alternating red-blue, you would ob- 
train three pure and distinct colors for 
the price of two! In a Mode 7 display, 
this makes 10 colors a possibility. 

This technique may be imple- 
mented in several ways. Program 2 
demonstrates one way. As in program 
1, program 2 asks you to type in two 
color- luminance combinations. These 
colors are displayed in separate squares, 
and then below them a rectangle is dis- 
played with the colors alternating on 
different display frames. 

The alternation is produced by the 



Listing 2 



1 REM ttPROGRAM 2** 

2 REM 

3 REM ILLUSTRATES COLOR DOT ALTERNATION 

4 REM YOU INPUT THE COLORS YOU WANT 

5 REM THE PROGRAM THEN DISPLAYS THEM 

6 REM AND MIXES THEM FOR YOU 

7 REM 

10 QRAPHICS 7 

20 SETCOLOR 4,0,14 

30 PRINT "FIRST COLOR (0-15), LUM(0-14 EVEN)" 

40 INPUT CF.LF 

50 PRINT "SECOND COLOR (0-1 5), LUM(0-14 EVEN}" 

60 INPUT CB.LS 

70 SETCOLOR 0,CF,LF 

80 SETCOLOR 1,CS,LS 

90 COLOR 1 

100 FOR 1-21 TO 39 

110 PLOT I,21:DRAWT0 I,39:NEXT I 

120 COLOR 2 

130 FOR 1-51 TO 69 

140 PLOT I,21:DRAWTO I, 39 « NEXT I 

170 SETCOLOR 2,0,0 

180 COLOR 3 

190 FOR 1-26 TO 54 

200 PLOT I,51tDRAWT0 1, 69a NEXT I 

210 POKE 36770,240 

215 RESTORE 

220 FOR 1-0 TO 39 

230 READ A 1 POKE 1536+1, As NEXT I 

240 DATA 72,138,72,169,0,141,10,212 

250 DATA 141 , 24, 208, 169, 20, 141 , 0, 2 

260 DATA 104,170,104,64,72,138,72 

270 DATA 169,0,141,10,212,141,24,208 

280 DATA 169,0,141,0,2,104,170,104,64 

290 POKE 1540,CF*16+LF|POKE 1560,CS»16+LS 

300 POKE 512, 0i POKE 513,6 

310 POKE 54286, 192 

320 END 



display list interrupt routines shown in 
listing 3. In listing 2, the routines are 
POKEd into memory at lines 220-280. 
When the routines are executed in their 
appropriate frames, the color register 
used for the third square is flip-flopped 
between the two colors you chose. Dur- 
ing the odd frames, the color register is 
set to the first color. During the even 
frames, the color register is set to the 
second color. Each interrupt routine 
causes the other one to execute during 
the next frame by modifying the dis- 
play list interrupt vector. The input 
colors are set into the interrupt rou- 
tines by line 290. The result on the 
screen is that the third square has a dif- 
ferent color than the other two. 

To fully utilize Color Dot Alterna- 
tion, some additional programming is 
needed. You must keep track of which 
pixels are to be mixed and which are 
not. This can be accomplished by using 
multiple display list interrupts in con- 



junction with tables giving the mode 
lines to be mixed. 

The implementation given here 
uses two display list interrupts for 
alternate frames. Another method is to 
use a single display list interrupt that 
flip-flops a color register. You would 
change the contents of the color regis- 
ter during alternate frames. A final 
method, although costly in memory, is 
to have two separate display memories. 
One would contain the color register 
numbers used during the odd frames, 
and the other would contain the color 
register numbers used during the even 
frames. If a pixel is to be a pure color, 
its associated color register number 
would be the same for odd and even 
frames. If a pixel is to be mixed, its 
color register number would alternate 
in the two display memories between 
the two registers to be mixed. A display 
list interrupt would be used to change 
the display list itself to point to the two 
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Listing 3 




DISPLAY LIST INTERRUPT ROUTINES FOR PROGRAM 2 


PHA ODD 


FRAME DLI ROUTINE 


TXA 




PHA 




LDA #0 


AT RUN TIME CONTAINS FIRST INPUT COLOR 


STA WSYNC 




STA COLPF2 


PUTS FIRST COLOR IN COLOR REGISTER 2 


LDA #20 


SETS EVEN FRAME DLI ROUTINE 


STA *S12 


TO EXECUTE DURING NEXT FRAME 


PLA 




TAX 




PLA 




RTI 




PHA 


EVEN FRAME DLI ROUTINE 


TXA 




PHA 




LDA #0 


AT RUN TIME CONTAINS SECOND INPUT COLOR 


STA WSYNC 




STA C0LPF2 


PUTS SECOND COLOR IN COLOR REGISTER 2 


LDA #0 


SETS ODD FRAME DLI ROUTINE 


STA «S12 


TO EXECUTE DURING NEXT FRAME 


PLA 




TAX 




PLA 




RTI 





display memory areas for different 
frames. 

One warning about this technique. 
When you alternate between colors of 
different luminances, flickering will 
occur. The flickering will worsen as the 
luminances get farther apart and will be 
almost non-existent when the lumi- 
nances are the same, especially with 
the higher color numbers. This flicker 
effect can be very useful for special ef- 
fects in your programming. 

The expansion possibilities for Col- 
or Dot Alternation seem endless. You 
can experiment with cycles of three or 
more. With a cycle of two, your color 
palette is 256. With higher cycle num- 
bers, the choices are greater, of course. 
We have used the technique effectively 
with cycles of up to four. 

Both Color Dot Mixing and Color 
Dot Alternation are simple techniques 
that expand the color possibilities of 
your Atari. By using these techniques, 
or variations, you can begin to realize 
the full graphics potential of your 
computer. 

Contact the authors at 901 Green Forest 
Drive, Montgomery, AL 36109. 

JMCRO 



APPLE II PERIPHERAL DEVELOPERS: 

Your complex (unction prototype requires 
the best wirewrap board available. 

SPECTRUM SYSTEMS MAKES IT! 



Fully Extended Wirewrap Protoboard. 

Size: 2.8 by 10.7 inch 2 layer PC. 
Capacity: up to 58-16 pin or12-40 pin 

or any combination sockets inbetween. 

Carefully designed +5 and GND planes provide lor 
the minimum electrical noise, low impedance, hi 
capacitance, and maximum versatility in the layout 
of IC's, capacitors, discretes and I/O connectors. 

Wire-wrap technique documentation included. 

Terms: 

• S45.00 + (6% Cal. Res. lax) + S2.00 S&H. 

• All payments must be in U.S. funds drawn on a U.S. 
bank. 

• Outside U.S. add 10%. 

• Cashier check/money order allow 30 day AR0. 

• Personal checks add 2 weeks. 

• No credit cards or cash, Please! 

Spectrum Systems 

P.O. Box 2262 

Santa Barbara, Ca. 93120 

Apple II is 3 tiademark ol Apple Computers 





the LEADER 
of the pack . . 



Write for free catalog with more than 400 fantastic 
values for all your word and data processing needs. 
Outside USA, enclose $1.00 . 

ABM PRODUCTS 

8868 CLAIREMONT MESA BLVD. 
SAN DIEGO, CALIFORNIA 92123 

Toll Free 800-854-1555 Orders Only 

For information or California Orders 

(714)268-3537 
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Introduction to 3-D Rotations 

on the Apple 



The techniques of 3-D rotation 
are discussed. An Applesoft 
demonstration program is 
provided, which includes 
general-purpose routines for 
yaw, pitch, and roll. 

ROTATE 

requires: 

Apple with Applesoft 

I am fascinated by the computer-gener- 
ated special effects recently proliferated 
through the film industry. The primary 
building block for these special effects 
is the 3-D rotation. I've discovered that 
these effects are remarkably easy to 
produce,- this article and program pass 
on the techniques required. 

The program is written entirely in 
Applesoft and isn't offensively slow, 
but don't expect fluid motion. The pro- 
gram documentation is thorough, but 
you should make two copies (one with 
REMs, one without). Executing the 
REMed program will try your patience. 

I won't provide an in-depth discus- 
sion on the math; you don't need to 
understand it to do rotations. Just strip 
out my subroutines and use them 
where you need them. 

The program draws a hi-res 3-D rec- 
tangular box and then rotates it. The 
rotation occurs in discrete steps of 15 
degrees. It takes about 90 seconds to 
rotate through 360 degrees. 

This box is a real-world object — it 
has height, width, and depth. The task 
in doing 3-D display is to project real- 
world objects onto a two-dimensional 
surface. 

Figure 1 is the Apple hi-res screen 
for X and Y. Z is supposed to be an axis 
drawn out of the screen and perpen- 
dicular to it. Since that can't be done, 
represent Z as a line drawn at a 
45-degree angle, upper left to lower 
right. This line allows you to put depth 
on the screen. 

Figure 2 introduces the box and 
shows how the 3-D to 2-D projection 
works. Notice that the comers of the 



by Chris Williams 



object are numbered points. They cor- 
respond to the CR array in the program. 
This array is dimensioned (3,8). The 
object has eight corners and each comer 
has three elements representing X, Y, 
and Z coordinates. Lines 170 through 
400 of the program simply define the 
box in 3-D space. 

Now you need to project it onto the 
2-D plane. X and Y coordinates corres- 
pond precisely so they pose no problem. 
The Z coordinate is another matter. 

Since Z is defined to be at 45 degrees 
to both X and Y, then the Z coordinate 
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is related to X and Y as X = sin(45)*Z, 
Y = sin(45)»Z. Sine and cosine of 45 
degrees are both .707. Specify a corner's 
position in 3-D space as CR(1,J), 
CR(2,I), and CR(3,IJ where I selects the 
corner and 1,2,3 is XYZ. A corner's 2-D 
projection onto the X-Y screen is com- 
puted in lines 490 and 500 using 
X = X+.707»Z, Y = Y+.707*Z. Lines 
510 and 520 are there merely for scaling 
and putting the box near the center of 
the screen. 

The edges of the box are defined 
even more simply. They are in a table 
look-up contained within arrays II and 
12. Notice that both these arrays are 
dimensioned as 12 as there are 12 edges 
on the box. 

The number in each element of 
these arrays is a corner (see figure 2). 
That means an edge exists from point 
11(1) to point 12(1). If you look at lines 
550 through 590, you'll see HPLOT 
draws an edge from X(I1(I)),Y(I1(I)) to 
X(I2(I)),Y(I2(I)). 

That's all it takes to draw a 3-D 
box. You can convince yourself of this 
by turning off the rotation in the pro- 
gram (insert line 455 GOTO 480). This 
will display the box in X,Y. 

Now take out the GOTO and try 
rotating. Here, the problem is again one 
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Figure 2: (X,Y,Z) 
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of axis definition. Refer back to figure 1 . 
Call rotation about the Z axis — Roll, 
about the X axis — Pitch, and about the 
Y axis — Yaw. The program does a Yaw 
rotation only. 

The trick is in the matrix multiply. 
If you let a given corner's coordinates 
beXl,Yl,Zl, then 

( \ f X ' 

= ROTATION MATRIX] Xl Y1 

where X2,Y2,Z2 is that point's new, 
rotated coordinates. 

If you don't understand that, don't 
worry. You'll be able to just plug 
numbers; you won't need to under- 
stand it. 

The rotation matrix above is defined 
in lines 620 through 720. The angle for 
the sine and cosine call comes from 
line 450 where degrees are incremented 
by 15 each time through the loop and 
then converted to radians. 

The choice of where the sine and 
cosine terms go in the rotation matrix 
determines whether the rotation is 
Roll, Pitch, or Yaw. Looking at the pro- 
gram, see that for Yaw 

s(Yaw) \ 
0.0 



/ c(Yaw) 
DIMRT(3,3)= 0.0 

\- s(Yaw) 



0.0 
1.0 

0.0 



c(Yaw) 



I 



How to run a listing in 
MICRO'S Software/Hardware 

The Software and Hardware 
Catalogs are provided as a ser- 
vice both to our readers and to 
the manufacturers. These entries 
are not MICRO reviews, but 
descriptions provided by the 
manufacturer. 

To run a free listing in either 
catalog, a company fiiis out the 
appropriate form or merely mails 
in their material in the same 
format that appears in the 
magazine. 

We try to limit entries to one 
company per month, on a first- 
come-first-serve basis. 

If you sell products our 
readers should know about, write 
to Software/Hardware Catalog, 
MICRO, P.O. Box 6502, 
Chelmsford, MA 01824. 



Listing 1 



REM 
REM 
REM 
RUM 
REM 
REM 



ROTATE TUTORIAL 
BY C. WILLIAMS 
COPYRIGHT 1932 
BY C. WILLIAMS 



10 DIM CO(3),C(3) 

20 DIM 11(12), 12(12) 

30 DIM RT(3,3) 

40 DIM CRNR(3,8) 

50 DIM XP(8),YP(8) 

60 DIM D(3) 

65 REM READ EDGE-START POINTS INTO II 

70 FOR I = 1 TO 12 

30 READ A 

90 11(1) = A 

100 NEXT 

110 DATA 1,2,3,4,5,6,7,8,1,2,3,4 

115 REM REM) EDGE-END POINTS INTO 12 

120 FOR I = 1 TO 12 

130 READ B 

140 12(1) = B 

150 DATA 2,3,4,1,6,7,8,5,5,6,7,8 

160 NEXT 

165 REM DEFINE 3-D POSITION OP CORNERS 



170 CRNR(1,1) 
180 CRMR(2,1) 
190 CRNR(3,1) 
200 CRNR(1,2) 
210 CRNR(2,2) 
220 CRNR(3,2) 
230 CRNR(1,3) 
240 CRNR(2,3) 
250 CRNR(3,3) 
260 CRNR(1,4) 
270 CRNR(2,4) 
280 CRNR(3,4) 
290 CRNR(1,5) 
300 CRNR(2,5) 
310 CRNR(3,5) 
320 CRNR(1,6) 
330 CRNR(2,6) 
340 CRNR(.3,6) 
350 CRNR(1,7) 
360 CHNR(2,7) 
370 CRNR(3,7) 
380 CRNR(1,8) 
390 CRNR(2,8) 
400 CWJR(3,8) 



= 0. 
= 0. 
= 0. 
= 0. 
= 1. 
= 0. 

= 1. 
= 1. 

= 0. 

= 1. 

= 0. 
= 0. 
= 0. 
= 0. 
= 2. 
= 0. 

= 1. 

= 2. 

= 1. 
= 1. 
= 2. 
= 1. 
= 0. 
= 2. 



75:FV = 15:EI = 3:HU = 150 



";AG 



405 REM LIME 410 SETTS VARIABLES FOR SPE35D 

410 P7 = .707:OE = 1:TW = 2:TR = 3:TT = 30:SF 

420 HC0L0R= 3 

430 HOME : VTAB 5: INPUT "ENTER INITIAL ROTATION ANGLE 

440 RAD = 3.14159 / 180. 

445 REM THE LOOP BEGINS HERE WITH ANGLE INCREMENT 

450 AG = AG + FV:AG = AG * RAO 

460 GOSUB 620: REM RT DEFINED 

470 QOSUB 740: REM MATRIX MULTIPLY 

475 REM THIS LOOP DOES THE 3-D — >2-D PROJECTION, PLUS SCREEN SCALING 

480 FOR I = OE TO EI 

490 XP(I) = CRNR(OE,I) + P7 * CRNR(TR.I) 

500 YP(I) = CRNR(TW,I) + P7 * CRNR(TR,I) 

510 XP(I) = (XP(I) * TT) + HU 

520 YP(I) = (YP(I) * TT) + SF 

530 NEXT 

535 REM ERASE OLD BOX, FULL SCREEN 

540 HGR : POKE - 16302,0 

545 REM DRAW IT, PUR TIE EDGES 

550 FOR I = 1 TO 12 

560 PI = 11(1) 

570 P2 = 12(1) 

580 HPLOT XP(P1),YP(P1) TO XP(P2),YP(P2) 

590 NEXT 

600 GOTO 450 

610 END 

615 REM SUBROUTINE AT 620 DEFINES RT 

620 CANGLE = COS (AG) 

630 SANGLE = SrN (AG) 

640 FOR I = I TO 3 

650 EOR J = 1 TO 3 

660 RT(I,J) = 0. 

670 NEXT J: NEXT I 

680 RT(1,1) = CANGLE 

690 RT(2,2) = 1. 

700 RT(3,3) = CANGLE 

710 RT(1,3) = SANGLE 



(con tim 
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Listing 1 (continued) 

720 RT(3,1) = ( - SANGLE) 

730 RETCJRN 

735 REM SUBROUTINE AT 740 DOES X,Y,^ <3?T 

740 TOR I = OE TO EI 

750 TOR J = OE TO TR 

760 C(J) = CRMR(J,I) 

770 NEXT J 

780 GOSUB B40: REM >W3 

790 CRNR(OE,I) = GO(OE) 

800 CRNR(TW, I) = CO(TW) 

810 CRNR(TR,I) = (X)(TR) 

820 NEXT : RETURN 

830 END 

835 REM LINE 840 STARTS THE MATRIX MULT. 

340 TOR K = 1 TO 3 

850 D(K) = 0. 

860 NEXT K 

870 TOR II = OE TO TR 

880 SOR J = OE TO TR 

890 D(II) = 0(11) + RT(II,J) * C(J): NEXT J 

900 NEXT II 

910 FOR II = OE TO TR 

920 CD(II) = D(II) 

930 NEXT II 

940 RETURN 



If you'd like to do Pitch rotations, 
rearrange the array to look like this: 



And for Roll rotations, like this: 



DIM RT(3,3) = 



0.0 0.0 

c(Pitch) - s(Pitch) 
s(Pitch) c(Pitch) 



/ c(Roll) 
DIM RT(3,3)= -s(Roll) 

V o.o 



s(floll) 0.0 
c(Roll) 0.0 
0.0 1.0 



If you don't know matrix algebra, it 



doesn't matter. Just rearrange lines 680 
through 720 to produce arrays as shown 
above and you can rotate any way you 
wish. 

That's all there is to 3-D rotation. I 
cringe as I say that because there are all 
sorts of things to be reckoned with. Re- 
fraction, shading, and hidden lines and 
objects are not topics to be discussed in 
an article with a title like this one. But 
the program here is a good foundation. 

There is room for improvement, of 
course. The more adventuresome 
readers might try defining other 3-D 
shapes and then rotating them. The 
subroutines are all there. Or you might 
work for speed; a more fluid update 
would certainly be a plus. Let me know 
what you come up with. 



Mr. Williams is an electrical engineer/ 
writer. He may be contacted at 5676 S. 
Meadow Lane #101, Ogden, UT 84403. 
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Systems 



D«cwion Systemi 

P.O. Bo» 13006 
D«nton, TX 76203 



SOFTWARE FOR THE APPLE II* 

ISAM-DS is an integrated set of Applesoft routines that gives indexed file capabilities 
to your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance that match 
products costing twice as much. 
$50 Disk, Applesoft. 

PBASIC-OS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF.. .ELSE..., CASE. SELECT, and many more. Develop 
programs for Integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL 
»35. Disk, Applesoft I48K, ROM or Language Cardl. 

DSA-DS is a dis-assembler to' 6502 code. Now you can easily dis-assemble any 
machine language program for the Apple and use the dis-assembled code directly as 
input to your assembler Dis-assembies instructions and data. Produces code com- 
patible with the S-C Assembler (version 4 0!, Apple's Toolkit assembler and others. 
S2S Disk, Applesoft I32K, ROM or Language Cardl 

FORM-DS is a complete system lor the definition of input and output froms. FORM- 
DS supplies the automatic checking of numeric mout for acceptable range of values, 
automatic formatting of numeric output, and many more features 
»25 Disk. Applesoft I32K. ROM or Language Card) 

UTIL-DS is a set of routines for use with Applesoft to lormat numeric output, selec 
lively clear variables (Applesoft's CLEAR gets everything), improve error handling, 
and Interface machine language with Applesoft programs Includes a special load 
routine for placing machine language routines underneath Applesoft programs 
$25 Disk, Applesolt 

SPEED-DS is a routine to modify the slatement linkage in an Applesoft program to 
speed its execution improvements of 5-20% are common As a bonus, SPEED-DS 
includes machine language routines to speed siring handling and reduce ihe need fo' 
garbage clean-up. Author Lee Meador 
*15 Disk, Applesoft (32K, ROM or Language Cardl 



I Add $4.00 for Foreign Meill 
"Apple II is a registered trademark of the Apple Computer Co 



PET/CBM 

SOFTWARE 



TM 



8032 

DISPLAY 



OR 



4032 

DISPLAY 



FROM THE KEYBOARD OR PROGRAM 
NOW RUN WORD PRO 3 OR WORD PRO 4 

FROM THE SAME MACHINE 

Available for either 4000 or 8000 Series 

ALSO: 
For 2001 / 3000 Series Computers 

Operate these Models in a Full 8032 Like 

Display For Word Pro 4* 

and all other 80 Column Software 

All installation instructions included. 

EXECOM CORP. 

1901 Polaris Ave. 
Racine, Wl 53404 
Ph.414-632-1004 

PET/CBM a trademark of Commodore Business Machines 
trademark of Professional Software, Inc. 
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THE TACKLER" 



DUAL • MODE PARALLEL INTERFACE FOR 

THE APPLE* 

2 BOARDS IN ONE FOR NO MORE 

COMPATIBILITY PROBLEMSI 

An intelligent board to provide easy control of your 

printer's full potential. Plus a standard parallel 

board at the flip of a switch - your assurance of 

compatibility with essentially all software for the 

APPLE*. Hires printing with simple keyboard 

commands that replace hard to use software 

routines. No disks to load. Special features include 

inverse, doubled, and rotated graphics and many 

text control features, available through easy 

keyboard or software commands. 

If s simple to print HIRESgraphicsfrom an APPLE computer with The Tackier 

from TYMAC. This is the first truly universal parallel interface! Plus the ROM 

for your specific printer. Sophisticated intelligence when you need it, total 

compability that never lets you down. 

Change printers - no need to buy another board. Just plug in one of our 

ROM'S and you're all set ROM'S available for Epson, C. ftoh, NEC, and 

Okidata - others available soon. 

You've asked us to make the TACKLER better than the others and we 

did $159.00 * 




UPGRAOEABLE 
PARALLEL PRINTER CARD 

A Universal Centronics type parallel printerboard 
complete with cable and connector. This unique 
board allows you to turn on and off the high bit so 
that you can access additional features in many 
printers. Easily upgradeable to a fully intelligent 
printer board with graphics and text dumps. Use 
with EPSON, C ITOH, ANADEX, STAR-WRITER, 
NEC, OKI and others with standard Centronics 
c onfiguration. $139.00 



THE PERFORMER PRINTER 
FORMATTER BOARD for Epson, OKI, NEC 
8023, CITOH 8510 provides resident HIRES 
screen dump and print formatting in firmware. 
Plugs into Apple slot and easy access to all 
printer fonts through menu with PR# command. 
Use with standard printercards to add intelligence. 
$49.00 specify printer. 




THE MIRROR FIRMWARE FOR NOVATION APPLE CAT II* 

The Data Communication Handler ROM Emulatessyntax of an other popular 
Apple Modem product with improvements. Plugs directly on Apple CAT II 
Board. Supports Videx and Smarterm 80 column cards, touch tone and rotary 
dial, remote terminal, voice toggle, easy printer access and much more. 
List $39.00 Introductory Price $29.00 



DOUBLE DOS Plus 

A piggy-back board that plugs into the disk-controller card so that you can 
switch select between DOS 3.2 and DOS 3.3. DOUBLE DOS Plus requires 
APPLE DOS ROMS. $39.00 



NIBBLES AWAY II 



AGAIN! Ahead of all others. 
AUTO-LOAD PARAMETERS . . . Free's the user from having to 

Manually Key in Param values used with the more popular software 

packages available for the Apple II. 
EXPANDED USER MANUAL . . . incorporates new Tutorials for 

all levels of expertice; Beginners Flowchart for 'where do I begin' to 

'Advanced Disk Analysis' is included. 
TRACK/SECTOR EDITOR . . .An all new Track/Sector Editor, 

including the following features: Read, Write, Insert Delete Search, 

and impressive Print capabilities! 
DISK DIAGNOSTICS . . . Checks 

such things as: Drive Speed, Diskette 

Media Reliability, and Erasing Diskettes. 
HIGHEST RATED . . . Best back up 

Program in Softalk Poll (Rated 8.25 

out of 10). 
CONTINUAL UPDATES. . .Available 

from Computer Applications and new 

listings on the source. 




$69.95 



Super PIX HIRES SCREEN DUMP 



The Software package that will allow your printer to dump page 1 or page 2 of 
the Apple Hires screen horizontally or vertically. Use with EPSON* MX-80 
with or without GRAFTRAX* Roms, MX-70 - OKI* Microline 80, 82, 83, 82A, 
83A- C. ITOH* 8510 and NEC 8023A. Requires Tymac Parallel Printer 
Board PPC-1 00... $24.95. 



APPLE LI NK-A versitile modem utility that provides the Apple user the 
ability to transfer disk files and software over the phone. Only one package 
needed for full transfers. Compatable with all DOS file types. $59.00 
(requires Hayes Micro Modem) 



TH E APPLE CARD-Two sided 1 00% plastic reference card Loaded with 
information of interest to all Apple owners. $3.98 



gE 



/MICRO-I4ARE DIST. INC. 

P.O. BOX 113 POMPTON PLAINS, N.J. 07444 

Dealer and Distributor Inquires Invited. 



85 LOCI = *7C80 



10 PC = *3FC7 



20 LABL: STEP 100 NODISP 



38 IF X<*3E OR @L0C1«*17 THEN GOTO LABL 



40 PRINT "HERE IS THE CULPRIT" 



50 SHOWO00 



PTD-6502 is a high speed, compiled BASIC-like lan- 
guage, light years ahead of the Apple II Single Stepper 
and far more sophisticated than any other 6502 de- 
bugger available. It allows you to sit back effortlessly 
while your computer glides through your code at a thou- 
sand instructions per second looking for your bugs. Or 
you can select a slower speed with updated display of 
memory. A paddle-controlled single stepper mode is 
also available. At either of the slower speeds, the 
PTD-6502 monitors and saves the last 1 28 instructions 
executed for review at any time. 

Virtually unlimited breakpoint complexity is per- 
mitted with the PTD-6502. IF statements with mixed 
AND's and OR's can be created to test conditions such 
as memory change, memory = value, instruction loca- 
tion, . . . and many others. You can have as many named 
breakpoints as you wish in both ROM and RAM. 

Some other features of the PTD-6502 include • Fast 
subroutine execution. • Hex calculator/converter. 

• Hex/ASCII memory dump. • Up to 16 machine lan- 
guage cycle timers. • Ability to monitor specific labeled 
areas in memory while stepping. • Effective address. 

• Accessible monitor commands. • A documented mod- 
ule for relocation of the PTD-6502 to virtually any loca- 
tion (source code supplied). 

The debugging program shown on the monitor is a 

simple example; it could be far more complex. If you can 
think of it, you can probably scan for it at 1 000 instruc- 
tions per second. If you're a professional, the PTD-6205 
can pay for itself in the first few hours of use. If you're a 
novice, you'll soon be debugging like a pro. 



ORDER: PTD-6502 Debugger 

including DOS 3.3 Disk 

and instruction manual 



$49.95 



(Note that disk is not copy protected. Order only 
one for each business or institution.) In Califor- 
nia, add 6.5% sales tax. 
PTD-6502 requires Autostart ROM for fast breakpoint. 

PTERODACTYL 
SOFTWARE 9 

1452 Portland Ave. • Albany CA 94706 • (41 5) 525-1 605 
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From Here to Atari 



By Paul Swanson 



We are pleased to introduce out new 
Atari Column. Paul Swanson has pub- 
lished articles in several microcom- 
puter magazines and has authored a 
book on disk techniques. He runs his 
own software consulting firm and 
markets a full-size keyboard for the 
Atari 400. 

The Atari has two microprocessors in- 
stead of one, unlike what you would 
find in most systems. The main pro- 
cessor is the 6502. Atari, Inc., custom- 
made the second processor, ANTIC, 
which is used to control just the 
graphics screen. A few other custom 
chips in the Atari are not full micro- 
processors, but you can control them 
through the hardware registers. 

Taking advantage of all the Atari's 
special hardware can be quite com- 
plicated. Fortunately, because of the 
various graphics modes available, 
much of this hardware can be accessed 
through BASIC without knowing very 
much about the hardware itself. 

You can write simple programs 
using the information in the BASIC 
Reference Manual supplied with the 
BASIC cartridge. More complex pro- 
grams that take advantage of Atari's 
special chips require more information. 
I will supply you with details of this 
special hardware in upcoming columns. 

Each month's column will focus on 
some feature of Atari's hardware. I in- 
tend to take these topics from letters I 
receive, so if you have questions or need 
more information on a specific func- 
tion, send me a letter at 97 Jackson St., 
Cambridge, MA 02140. (If you don't 
want your name mentioned, be sure to 
note that in your letter. I will include 
excerpts from letters in my columns.) 

In addition to answering questions 
concerning the Atari, this column will 
also contain information on new hard- 
ware and software from Atari and other 
manufacturers. Already available from 
second sources are memory boards for 
both the 800 and the 400. The 32K 
board (for both) has been available from 
several different companies for over a 
year now. There is also 48K on a single 
card that you can plug into your 400. 



I've heard of a 64K board but haven't 
seen it yet. The Atari can't address 64K 
directly because of the 16K reserved for 
the operating system ROM and the 
hardware registers. The 64K board is 
bank-selectable so it doesn't exceed the 
48K allowed. Available pseudo disks 
give you 128K of memory that you can 
access as if it were a disk. 

Many new products have been an- 
nounced for the Atari, and many are 
about to be announced. Much of the 
new software available is in response to 
Atari Inc.'s interest in home educa- 
tional applications. My First Alphabet, 
by Fernando Herrera, is still one of the 
best educational software packages 
available for younger children. A new 
program called Master Type, from 
Lightning Software, makes an interest- 
ing spaceship game out of learning 
touch typing. If you want to learn how 
to type, you may want to get your local 
computer store to demonstrate this 
program for you. It is listed at $39.95, 
requires 32K and a disk drive, and 
keeps your interest with 17 levels of 
complexity. These two software 
packages, as well as the memory 
boards, are available at most computer 
stores that carry Atari. 

This column, on occasion, will try 
to clarify conflicting rumors. For exam- 
ple, I have heard three or four people 
asking about the "special vector" you 
can use in the Atari to get rid of the key 
click. I can appreciate the need for 
eliminating that noise — it seems much 
louder when everyone else is asleep — 
but I disassembled part of the operating 
system looking for the keyboard click 
and found no place to POKE anything 
that would eliminate it. The part in 
question is in ROM and you can't alter 
ROM with a POKE. It doesn't check 
with any RAM locations before the JSR 
(Jump to SubRoutine) that produces the 
click. The only ways I can see to 
eliminate the click include physically 
disconnecting the keyboard speaker or 
writing your own keyboard handler. 
Even writing the keyboard handler 
would not eliminate the click under 
every possible condition; you have to 
initiate the handler every time one of a 
variety of different things happens. 

Future columns may also include a 
listing of a short utility program 
(BASIC) that is in the public domain. No 



machine-readable copies will be avail- 
able. If you really don't want to type it 
in, check with your local user group to 
see if anyone already typed it in. 

My December column will feature 
the Atari Regional Software Acquisi- 
tion Centers; January will include 
available technical literature. Decem- 
ber's column will be of particular in- 
terest if you plan to market any of your 
Atari software. January's topic covers 
places where you can find lists and ex- 
planations of all those special memory 
locations that you need to develop fan- 
cier software. _ 

AMCftO 



It Pays 
to Write 
for MICRO! 

Get paid for your ideas: 
write for MICRO! Thousands 
of people read MICRO every 
month. MICRO is sold in 
computer stores and on 
newsstands worldwide. Send 
for a copy of our Writer's 
Guide now. Our author 
payment rate is competitive 
with the leading magazines in 
the industry. 

We welcome articles on any 
aspect of 6502/6809/68000 
hardware and software for the 
Apple, Atari, CBM/PET, 
TRS-80 Color Computer, VIC, 
OSI, 6809, or 68000. Topics for 
upcoming issues are: 
Programming languages 
(besides BASIC), 
Communications, Operating 
Systems, and new Computers. 
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What '$ eating 
your Apple? 



Find out with Apple-Cillin II™ 

It's a fact of computer life. Software and 
hardware interact. If there's a problem eating 
your Apple, you can spend hours trying to 
find out whether software or hardware is the 
culprit. Unless you have Apple-Cillin II. 
Apple-Cillin II is a comprehensive diagnostic 
system developed by XPS to check the 
performance of your Apple II computer 
system. Apple-Cillin II contains 21 menu 
driven utilities to thoroughly test the operation 
of your system, and either identify a specific 
problem area or give your system a clean bill 
of health. Quickly and easily. 
Apple-Cillin II works with any 48K Apple 
system equipped with one or more disk 
drives. 

To order Apple-Cillin II - and to receive 
information about our other products - Call 
XPS Toil-Free: 1-800-233-7512. In 
Pennsylania: 1-717-243-5373. 
Apple-Cillin II: $49.95. PA residents add 6% 
State Sales Tax. 



XPS 



XPS, Inc. 

323 York Road 

Carlisle, Pennsylvania 17013 

800-233-7512 

717-243-5373 



NEW SOFTWARE 

for TRS 80 Model I II 

and the Color Computer 



■ Church Contribution System 

designed to simplify and facilitate the tedi- 
ous chore of recording envelopes. Provides a 
variety of reports. Maintains its own data- 
files. Only $150 

■ Data Base Manager 

designed to help organize all your data and pro- 
vide you with meaningful reports. Add or delete 
any information. New files can be created and 
old information transferred. Only $150 

■ Single Entry Ledger 

designed as an uncomplicated control of 
finances for home or small business. Add, de- 
lete, edit at any time. Compatible with 
DBM. Only $95 

Write or phone for complete software price list. 





VISA' 



2457 Wehrle Drive 
Amherst, NY 14221 
716/631-3011 



CSE means OSI 

Custom After Market Software 
for C1P and C4P machines 



'Basic Enhancer: 

Renumber, Auto Sequencer, Screen Control func- 
tions, and tape 1/0 system that is faster and has file 
names 

C1P $21.95 

CAP $29.95 

Modified Monitor Rom Chip: 

Now get indirect jump-capabilities just like those 
in the C1P and for no extra charge CSE will burn in 
your machines serial number $16.95 

'NOTE: The C4P version of the Basic Enhancer in- 
cludes the modified monitor Rom chip required for 
proper program functioning. 

This is only a partial listing of our products. Write us 
for information on new disk programs or send $2 for 
catalog. Please include $2.00 shipping and handling 
with orders. 

Computer 

Science 

Engineering 

Box 50 • 291 Huntington Ave. Boston 02115 



Apple II is 3 frafcmart ol Apple Computer Inc 
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Dr. William R. Dial 
438 Roslyn Avenue 
Akron, OH 44320 



78. Color Computer News, Issue No. 10 (July, 1982) 

Jackson, Jesse W., "TTYPELOG," pg. 58-60. 

A utility for the Color Computer to log tape information to 

your printer. 
Rouse, Alan, "Mortgage," pg. 62-64. 

A "What If" program for the Color Computer. 
Eichman, Steve, "Shaplist," pg. 65-67. 

An Inventory/ File program for the 6809-based Radio Shack 

Color Computer. 
Aker, Jack L., "BASIC Program Line Mover," pg. 69-70. 

A utility for a Color Computer with Extended BASIC, and 

16K or 32K memory. 

Becus, Georges A., "TRACETXT Listing Produced by PRIN- 
TXT CTRACE," pg. 71-75. 

A trace utility for the 6809-based Color Computer. 
Pretty, Richard, "A Pull on Your 'Art' Strings," pg. 77. 

A simple string art program for the TRS-80 Color Computer. 
Barnes, Mark, "Gold Mine," pg. 78-81. 

A graphics maze game for the 6809-based Color Computer. 
Wright, Darrel, "Convert That File," pg. 83-84. 

A utility program to convert a Telewriter text file to a standard 

ASCII data file or vice versa. For the TRS-80 Color Computer. 
Peterson, Russell M., n, "Exploring Graphics Modes," pg. 87-88. 

Using the SDS80C Editor/Assembler on the TRS-80 Color 

Computer. 

79. 80-U.S. Journal, 5, No. 7 (July, 1982) 

Roberts, R.N., "Togetherness," pg. 88-89. 
Tape merge for the 6809-based TRS-80 Color Computer. 

Causer, R. Shane, "17K of RAM," pg. 94-95. 
Squeeze extra space from memory on your TRS-80 Color 
Computer. This is done by saving IK of memory out of a pro- 
gram requiring 16K of memory. 

80. The Rainbow, 2, No. 1 (July, 1982) 

Parkman, Bob, "Silent Answer," pg. 4. 

A driver to interface a TI Silent 700 with the 6809-based 

TRS-80 Color Computer. 
Mir, Jorge, "Let's Go On A Simple Rainbow Adventure," pg. 
9-17. 

An adventure-type program for the Color Computer. 
Blyn, Steve, "Design Programs to Help Children Learn," pg. 
18-19. 

BEEPEROO is a simple program for the Color Computer 

which can be used to reinforce the concept of simple addition 

of three-digit numbers. 
Penrose, Paul, "Playing Around With Your 80C," pg. 22. 

Playing music with the TRS-80 Color Computer. 
Morgan, Alan J., "Synchronizing with Your SAM Chip," pg. 
24-25. 

Using the 6883 SAM chip with the 6809-based Color Computer. 
Nolan, Bill, "Make Magic Rings on Magic 80C," pg. 27-29. 

For addicts of fantasy role-playing programs, this Color Com- 
puter listing rolls up magic rings for you. 
Rutledge, E.P., "Disk File Helps You Keep Track of Every- 
thing," pg. 30-33. 

A utility for the 6809-based Color Computer. 
Lewandowski, Dennis S., "Let's Soak Up Some Assembly," 
pg. 38-39. 

A second tutorial on 6809 assembly-language programming. 
Ebbert, Jim, "Is There Any Escape from No Escape?", pg. 42-45. 

A space-navigation graphics program for the Radio Shack 

TRS-80 Color Computer. 



Waclo, John, "The NFL Report Can Choose This Fall's Win- 
ners," pg. 50-64. 
Put the National Football League on your Color Computer. 

81. Compute! 4, No. 1 (January, 1982) 

Mansfield, Richard, "BRANCH NEVER and QUIF Assembling 
on SuperPET," pg. 146-149. 
An instructional article for SuperPET users. 

82. Microcomputing, 6, No. 8 (August, 1982) 

Whitman, James A., "Pascal and BASIC Square Off, Con- 
tinued," pg. 22. 

Benchmark tests including data on the 6809-based TRS-80 

Color Computer. 

83. MICRO, No. 51 (August, 1982) 

Steiner, John, "Interfacing the Color Computer," pg. 33-36. 
Circuits to interface the TRS-80 Color Computer to an 
RS-232 port and a motor control relay are presented. A Morse 
Code send/receive program is included as a demonstration. 

Staff, "MICRO Reviews in Brief," pg. 39-41. 
Reviews include discussion of a disassembler for the 6809 
and the Compuvoice Synthesizer for the 6809-based Color 
Computer. 

Dial, Wm. R., "6809 Bibliography," pg. 118. 
Some 26 items relating to 6809 literature are listed. 

84. 80 Micro, No. 52 (September, 1982) 

Miller, Franklyn D., "The Colorful Computer — Part H," pg. 
152-162. 

Twenty programs for the 6809-based TRS-80 Color Computer. 
Tucker, Richard, "Cheaper Upgrade," pg. 186-188. 

Do it yourself and save substantial cost in converting a 4K 

Color Computer, 8K Color BASIC to a 16K Extended Color 

BASIC by installing the new ROM yourself. 
Norman, Scott L., "Pascal Goes Color," pg. 198-202. 

Compiled Pascal for the Color Computer is discussed. 
Sprouse, Gerald, "Joystick Paintbrush," pg. 230-232. 

Use the Color Computer like a drawing board, employing 

two programs listed. 
Osborne, Frank H., "Conversion," pg. 238-240. 

Rewrite Level II BASIC programs to run on the 6809-based 

Color Computer. 
Heusinkveld, John, "PCLEAR 0," pg. 282. 

Make hi-res graphics use high memory on the 6809-based 

Color Computer. 

85. Personal Computer, 5, No. 8 (August, 1982) 

Curtis, Mike and Whelan, Joe, "The Dragon," pg. 112-116. 
Dragon 32 is a new 6809-based British microcomputer with 
full color, 32K RAM, 16K Microsoft BASIC, etc. 

86. Color Computer News, Issue No. 11 (August, 1982) 

Morrow, Ken, "Program Relocation," pg. 19-21. 

Discussion and listing for program relocation on the 

6809-based TRS-80 Color Computer. 
Bassen, Howard, "Optimizing High-Resolution Animated 
Games in Extended BASIC — Part 2," pg. 23-26. 

Tutorial on the use of game routines with several demo 

listings. 
Lester, Lane P., "Motion Picture Programming and the 
Teacher," pg. 27-28. 

Animation on the Color Computer. JMCftO 
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Software Catalog 



Name: Adventure to 

Atlantis 

System: Apple II 
Memory: 48K 
Language: Machine Code 
Hardware: One disk drive 
Description: This game com- 
bines the best features of 
adventure games, arcade 
games, and fantasy role- 
playing games. Adventuie to 
Atlantis is a sequel to Odyssey: 
The Complete Adventure. The 
struggle between the forces of 
magic (The High One) versus 
the forces of science (The 
Atlanteans) continues. The 
game uses four methods to 
grab the player's attention: 
high-resolution color graphics 
and animation, sound effects 
to enhance the action, random 
events at all stages of the 
adventure, and embedded 
arcade-like action. 
Price: $40.00 

Includes one floppy disk. 
Author: Robert C. Clardy 
Available: 

Synergistic Software 

830 N. Riverside Drive 

Suite 201 

Renton, WA 98055 



Name: The Business 
Bookkeeping 
System™ 

System: Apple II, Apple II 

Plus, Apple in 
Memory: 48K 
Language: Applesoft BASIC 
Hardware: Two disk drives, 
video monitor, 
printer, emulation 
mode (Apple HI) 
Description: The Business 
Bookkeeping System is a cash 
accounting system that in- 
cludes general ledger, cus- 
tomer activity, vendor activity, 
and employee activity. It con- 
tains eleven general ledger 
reports, five customer activity 
reports, four vendor activity 
reports, and six employeee ac- 
tivity reports. 
Price: $395.00 

Includes indexed 

documentation, ten 

diskettes, toll-free software 

support. 
Available: 

Dakin 5 — Authorized Apple 

dealer 



Name: Astro Blast 
System: TRS-80 Color 

Computer 
Memory: 16K/cassette 

32K/disk 
Language: Assembly 
Hardware: Joysticks 
Description: Astio Blast is a 
space "shoot-em-up" featuring 
the highest resolution 
graphics, lots of color, and 
dramatic sound effects. Wave 
after wave of alien attackers 
are a challenge to your joystick 
and fire-button skills. Three 
selectable skill levels coupled 
with automatic game accelera- 
tion challenge both novice and 
professional. 
Price: $24.95/cassette 

$29.95/disk 

Includes full instructions. 
Author: Ron Krebs 
Available: 

Mark Data Products 

23802 Barquilla 

Mission Viejo, CA 92691 



Name: INTROL-C/6809 
Compiler System 

System: FLEX, UniFLEX, 

OS-9, CP/M 
Memory: 56K 
Language: C 

Description: Powerful C lan- 
guage compiler develops pro- 
grams in C for systems run- 
ning under FLEX, UniFLEX, or 
OS-9; also as cross-software for 
CP/M-based development sys- 
tems. Full-blown implementa- 
tion provides full support of all 
standard C except initializers 
and bitfields. Written entirely 
in C itself, Introl-C includes a 
C compiler, 6809 assembler, 
linking loader, standard run- 
time library and library 
manager, and unsurpassed 
code efficiency. 
Price: From $400.00 

Includes diskette, user 

manual, one-year 

maintenance/update. 

Author: Richard D. Pennington 
Available: 

Introl Corp. 

647 W. Virginia St. 

Milwaukee, WI 53204 

(414) 276-2937 



Name: Frazzle 

System: Apple II or Apple 

IIPlus 
Memory: 48K 
Language: 6502 Assembly 
Hardware: Disk Drive (Dual 

DOS 3.2/3.3] 
Description: Muse announces 
the release of Frazzle, the com- 
puter game that puts you in 
the future. The scene begins in 
space, with you commanding a 
Frazzle Force Ship that is sud- 
denly under attack by Beasties. 
Colorful screen graphics show 
your position on the ship's 
radar screen, the force field 
surrounding you, and odd- 
shaped Beasties zooming in. 
Your ammunition is pulsating 
Energy Probes, which beep and 
flash as you release them on 
the screen. You must stop the 
Beasties while avoiding colli- 
sions with them, with the walls 
of the force field, and with 
your own ammunition. Sound 
effects include the electronic 
hum of a radar monitor and the 
squish of Energy Probes dis- 
solving the Beasties. 
Price: $24.95 
Author: J.C. Nolan 
Available: 
Direct from Muse and 
computer stores nationwide 



Name: K-Razy Kritters 

System: Atari 400/800 
Memory: 8K 
Language: Machine Code 
Hardware: ROM Cartridge 
Description: This challenging 
celestial adventure with ten 
levels of play begins with three 
command ships. The player's 
active command ship attempts 
to destroy free-falling alien 
patrol "Kritters" descending 
from above. Weapons include 
standard missiles and super- 
missiles. If a command ship is 
destroyed, a sanitation crew 
will remove the wreckage. 
Price: $39.95 suggested retail 

Includes ROM cartridge and 

instruction booklet. 
Author: Torre Meeder 
Available: 

K-Byte 

1705 Austin 

Troy, MI 48084 

or your local computer 

software dealer 



Name: 3D Drawing Board 

System: TRS-80 Color 

Computer 
Memory: 16K 
Language: BASIC 
Description: 3D Drawing 
Board is a tool for education, 
entertainment, or serious proj- 
ects. It helps you draw objects 
in three dimensions, rotates 
them, and changes elevation, 
size, and distance. The draw- 
ings can be saved to tape or 
disk for future use. 
Price: $24.95/cassette 

$29.95/disk 

Includes complete 

instruction manual and 

program with samples. 
Author: Mark Laessig 
Available: 

Computerware 

Box 668 

Encinitas, CA 92024 

(714) 436-3512 

Name: Computer- Aided 

Instruction for 
General Chemistry 

System: Apple, 

Commodore PET, 
TRS-80 IH 
Memory: 48K/ Apple II 
Language: Applesoft/Apple II 
Hardware: Apple — DOS 3.3 
PET — 4040 or 
2031 disk drive 
Description: A comprehensive 
set of 20 programs designed to 
supplement a course in general 
chemistry. Each program con- 
tains 50-70 drills, exercises, 
and problems (approximately 
24 Yi hours of machine time) 
presented in an interactive for- 
mat. The questions are ran- 
domly generated. No computer 
experience is necessary. In- 
tended for introductory college 
level or advanced placement in 
high school. 
Price: $325.00 
Includes four disks for the 
Apple II, two disks for the 
PET, and four or five disks 
for the TRS-80, and 
complete documentation. 
Authors: William Butler 
Raymond Hough 
Available: 
John Wiley & Sons, Inc. 
Eastern Distribution Center 
Order Processing Dept. 
1 Wiley Drive 
Somerset, NJ 08873 

JMCftO 
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Plus Sensational Limited-Time Savings 
On Ohio Scientific C1P Series personal 
computers, Superboard and C1 P 
accessories, spare replacement parts, 
printers, monitors, integrated circuits, 
and other computer-related components. 

To Order 

Call us directly or return order coupon with 
your check, money order, or Mastercard or 
Visa Account Number. Orders will normally be 
shipped within 48 hours after receipt. 
$100.00 minimum order. 

FREE 

Sampler Cassettes with each Superboard II and 
C1P series order! 

Taxi (Game), Electronic Equations, Loan Finance, Straight 
and Constant Depreciation, Uneven Cash Flows 

Tiger Tank, Flip Flop, (Logic Game), Hectic, Black Jack, 
Master Mind 



Super Sale! 



40% Off On Ohio Scientific Superboard II 
A Complete Computer System On A Board 

Includes full-size 53-key keyboard, video and audio cassette 
interfaces; SWAP, Modem, sampler cassettes; manual; 8K 
BASIC-in-ROM, with 8K RAM. Requires 5-V/3 amp regulated 
DC power supply. 30-day limited warranty. Supply is limited. 
ONLY $200.00 



Cleveland Consumer Computers & Components 

1333 S. Chillicothe Road, Aurora, OH 44202 
TO ORDER: CALL 1-800-321-5805 TOLL FREE 
(Ohio Residents Call 216-562-4136) 



D SUPERBOARD II, $200.00 

D Send Detailed Catalog/Order Form 




Name . 



Address . 



State_ 



City 

Payment by enclosed check or money order or charge to: 
D MasterCard Q VISA 

Account # Expiration Date 

Total Amount Charged or Enclosed $ 



-Zip- 



Ohio Residents Add 5.5% Sales Tax. All Orders Will Be Shipped Insured By UPS Unless 
Requested Otherwise. 



comp case 



IS THE PERFECT GIFT FOR THE COMPUTER THAT HAS EVERYTHING 




Your investment in a computer is long term. You expect 
many years of reliable service. Comp Case protects 
your investment when not in use or while transporting it 
from office or home. Your computer never leaves the 
case — you simply remove the lid, make the electrical 
connection, and operate. Comp Cases are available for 
most brands of computers and peripherals. 



Comp Case is the perfect Christmas 
gift. Comp Cases are available in 
better computer stores in our area. 
Or call 800-848-7548 direct to 
receive your Comp Case in 
time for Christmas. 



COMPUTER CASE COMPANY • 5650 INDIAN MOUND COURT • COLUMBUS, OHIO 43213 
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Name: Joystick 
System: Apple II Plus 
Description: This joystick is a 
joy to use. Its heavier metal 
case doesn't slip or slide like 
plastic. And the very sensitive 
switch is guaranteed for 
1,000,000 pushes. Better con- 
trol and reliability. 
Price: $59.95 
Available: 

Datamost, Inc. 

9748 Cozycroft Avenue 

Chatsworth, CA 91311 

|213) 709-1202 

or computer stores 

Name: Apple-Mate 
Hardware: Floppy disk drive 
Description: Add this floppy 
disk drive to your Apple com- 
puter. It is 100% compatible 
with the Apple Disk n drive, 
and with all Apple software in- 
cluding half-track-protected 
software. 
Price: $335.00 

Includes cable. 
Available: 

Quentin Research, Inc. 

19355 Business Center Dr. 

Northridge, CA 91324 

|213) 701-1006 



Name: Freedom 100 

Description: This is an ASCII 
CRT terminal. It has a block 
mode, ten function keys, 15 
graphics characters with full 
attributes, one-page screen 
memory, and separate attri- 
butes buffer. 
Price: $595 
Available: 
Liberty Electronics, USA 
100 Clement Street 
San Francisco, CA 94118 



Name: Gimix Intelligent 

Serial I/O 
Processor Board 

System: Gimix 6809 
Memory: 128K minimum 
Hardware: S-30 I/O bus 

board 
Description: This board re- 
duces the number of interrupts 
between user terminals and 
the host CPU by buffering data 
transfers between system and 
users and preprocessing of the 
data. It has on-board CPU and 
RAM/EPROM memory, three 



RS-232C serial ports, a Z8038 
F10 I/O interface, and sup- 
ports up to three users. It re- 
quires on-board software and 
OS drivers. 

Price: $438.11 

Includes 4K RAM. (Software 

is optional.) 
Available: 

Gimix Inc. 

1337 W. 37th PI. 

Chicago, IL 60609 

(312] 927-5510 



Name: The Spectrum 
Stick 

System: TRS-80 Color 

Computer 
Memory: 4K and up 
Hardware: Joystick 
Description: This new joystick 
has a hair-trigger firebutton 
and swivel-ball type compo- 
nent stick. The extra-long 
cable makes it easier to put 
your joystick where you want 
it. Red LED indicator reminds 
you to shut off the Color 
Computer. 

Price: $39.95 plus $2.00 S/H 
Includes 10-foot cable, red 
LED indicator, joystick, 
firebutton, case, and joystick 
control 
Available: 
Spectrum Projects 
93-15 86 Drive 
Woodhaven, NY 11421 
(212) 441-2807 Voice 
(212) 441-3755 Computer 



Name: Disk-O-Tier 

System: All disk-based 
systems 
5Yi" or 8" 
Description: A convenient 
desktop holder for diskettes 
that prevents damage by laying 
them flat, but allows full 
visibility of all diskettes. It is 
molded of durable NAS smoked 
plastic, and holds eleven 
diskettes. 
Price: $9.50 plus $2.00 

postage 

$19.00 for twin-pack, ppd. 

Available: 
ETS Center 
Dept. 97 
Box 651 

35026-A Turtle Trail 
Willoughby, OH 44094 
(216) 946-8479 



Name: Pro-Guard 8" 

Floppy Controller 

System: Apple III 
Memory: 2.2 megabytes 
Hardware: 8" Shugart- 

compatible drives 
Description: Pio-Guaid 8" 
Floppy Controller adds up to 
2.2 megabytes of removable 
media and provides backup for 
Apple profile. IBM 3740 format 
allows 8" disks to be read on 
other computers, including 
IBM mainframes. 
Price: $695 

Includes DOS, SOS, Pascal, 

CP/M distribution software, 

cables, manual. 
Available: 

Apple Dealers 

MICRO-D 

SUA, Inc. 



Name: Programmable 

Sound Module 

System: TRS-80 Color 

Computer 
Memory: 4K and up 
Language: BASIC 
Description: The Program- 
mable Sound Module is a plug- 
in cartridge for the Color Com- 
puter. A separate audio- 
microprocessor and ROM in- 
side the cartridge combine to 
extend BASIC'S vocabulary 
with a versatile sound-effects 
system. Complex noises can 
be created with short BASIC 
phrases and maintained in- 
dependently of your program, 
allowing simultaneous video 
and audio effects. 
Price: $139.95 

Includes PSM cartridge, 

operating system in ROM, 

and full instructions. 
Available: 

Maple Leaf Systems 

Box 2190 

Station "C" 

Downsview, Ontario 

Canada M2N 2S9 



Name: Voter 30 

System: Apple II 
Language: BASIC 
Description: Voter 30 is a 
peripheral hardware /software 
package for training, market- 
ing, and educational uses using 
a group response system for up 
to 30 participants. Each par- 



ticipant gets a hand-held 
keypad to respond to multiple- 
choice questions. Voter 3C 
tabulates the responses and 
produces a color bar chart 
showing the breakdown, while 
keeping a record of the in- 
dividual station responses. 
Price: $595 for interface card 

with programs and manual. 

$125.00 each for polling 

stations with cable and 

connectors. 
Available: 

Reactive Systems, Inc. 

40 North Van Brunt Street 

Englewood, NJ 07631 

(201) 568-0446 



Name: Mini-Video 

182-140 

System: 6502-based video 

board 
Memory: 4K RAM/ 

4K EPROM 
Language: Video Display,- 
Monitor &. Tom 
Pittman's Tiny 
BASIC 
Hardware: Assembled circuit 

board 
Description: Add a videc 
display to your AIM or othe: 
computer. It will run Ton 
Pittman's Tiny BASIC witl 
the addition of the paralle 
keyboard, 5V power supply 
and video monitor. Th< 
2716-character generator wil 
produce 256 8x8 characters 
ASCII upper- and lower-case 
and graphic characters. Th< 
44-pin expansion connecto: 
can be used to add up to 6K o 
memory or extra I/O ports 
The cursor is flashing under 
line type. Power requirements 
5 volts, 600 MA, 3 watts. 
Price: $149.95 

Includes documentation and 

assembled board without 

EPROMs. 
Available: 

John Bell Engineering, Inc. 

1014 Center Street 

San Carlos, CA 94070 

(415) 592-8411 
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ATARI 400/800 



Atari 400 and 800 are color-and-sound computers. 6502 is the main processor and ANTIC handles video. 
Atari 400 has a membrane keyboard and Atari 800 has a full-size typewriter keyboard. 

Peripherals may include up to four disk-drive units, a cassette unit, printer, and the 850 interface module. 
Four programmable controller ports handle joysticks, paddles, light pens, and other accessories. 

Sophisticated graphic capabilities include: 256 colors (16 may be displayed on the screen at once), 17 
graphic modes (6 character and 11 map), high-resolution graphics (up to 320 x 192), and powerful 
player/missile graphics. 



• 







Some Useful Memory Locations on the Atari 


Page Locations: 






Hex 


Dec 


Length 


Name 


Description 


0010 


016 


1 


PQKMSK 


IRQ mask 


0012 


018 


3 


RTCLOK 


Real time dock 
018 is hi order 


0041 


065 


1 


SOUNDR 


Noisy I/O flag 


0042 


066 


1 


CRITIC 


Critical I/O flag 


004D 


077 


1 


ATRACT 


Attract mode flag 


0052 


082 


1 


LMARGIN 


Left margin 


0053 


083 


1 


RMARGIN 


Right margin 


0080 


128 


2 * 


LOMEM 


Buffer used to token Ize line of BASIC 


0082 


130 


2 * 


VNTP 


Variable name table start 


0084 


132 


2 * 


VNTD 


Variable name table dummy end 


0086 


134 


2 * 


VVTP 


Variable value table start 


0088 


136 


2* 


STMTAB 


Statement table 


008A 


138 


2 * 


STMCUR 


Current statement pointer 


008C 


140 


2 * 


STARP 


String and array area 


008E 


142 


2 * 


RUNSTK 


BASIC'S software stack 


0090 


144 


2 * 


MEMTOP 


Top of memory used by BASIC program 


00BA 


186 


2 


STOPLN 


Line number of most recent stop or error 


0OC3 


195 


1 


ERRSAV 


Error number causing TRAP branch 


00CB 


203 


7 


Available for 


user machine -language programs 


00D0 


21.2 


2 


Value return from machine language to BASIC 


* Indicates lot 


ation is a vector 





ANTIC Commands (Display List) 

Blank line commands: 
Command is {# tines + 1)*16 
Ex.: Blank 8 lines is (8 + 1)* 16, or $70 = dec. 144 

Jump instruction: $01 = dec. 1 (2-byte instruction) 

Jump on vertical blank = $41 = dec. 65 (2-byte instruction) 

Display line instruction is equal to the IR mode number 
($02-$OF) 

To set special features, add these values to the instructions: 



Add 
Hex 



Dec. For 



10 16 Horizontal scroll enable 

20 32 Vertical scroll enable 

40 64 Load memory scan (makes it a 2-byte 

instruction) 
80 128 Display list interrupt enable 

Note: Display list interrupt can be enabled on any command, 
but scrolling and load memory scan can be enabled only on 
display commands. 



ANTIC Commands (Display Modes) 










Scan 












Lines 






Made 




Horlz. 


Per Mods 


Char/Map 


IR 


BASIC 


Pixels 


Llns 


Colors 


Mode 


02 





40 


8 


1.5 


C 


03 




40 


10 


1.5 


C 


04 




40 


8 


5 


C 


05 




40 


16 


5 


C 


06 


1 


20 


8 


5 


C 


07 


2 


20 


16 


5 


C 


08 


3 


40 


8 


4 


M 


09 


4 


80 


4 


2 


M 


0A 


5 


80 


4 


4 


M 


0B 


6 


160 


2 


2 


M 


OC 




160 


1 


2 


M 


0D 


7 


160 


2 


4 


M 


0E 




160 


1 


4 


M 


OF 


8 


320 


1 


1.5 


M 



SGTIA: ^^^^^^^^^^^^^^^^^ 

The GTfA modes are versions of mode 8, instituted 
by adding 64, 128, or 192 to PRIOR. 



GTIA Mode Description 

9 16 luminances of background hue 

10 9 colors - uses $D012 through $D01A 

11 16 hues of background luminance 
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ATARI 400/800 



COLOR VALUES: 

Black-gray-white 

1 Burnt Orange 

2 Orange 

3 Red-orange 

4 Red 

5 Purple 

6 Blue-purple 

7 Blue 

8 Blue 

9 Gray-blue 

10 Turquoise 

1 1 Aqua 

12 Green 

13 Yellow-green 

14 Orange-green 

15 Orange 



Default colors (SETCOLOR values): Joysticks' 

0,2,8 (Orange) 

1,12,10 (Light green) 

2,9,4 (Dark blue) 

3,4,6 (red) 

4,0,0 (Black) 



11 



For COLORS: 

POKE hue* 16 + luminance into COLx 

For SOUND: 

POKE frequency into AUDFx 

POKE distortion* 16 + volume into AUDCx 




Hardware Registers and Shadows 



Address 


Shadow 




(RJaad 


or 


Hex Dec 


Hex 


Dec 


Name 


Description (W)rlte 


COLORS: 












D0 12 53266 


02C0 


704 


COLPMO 


Player- missile 


W 


D013 S3267 


02C1 


705 


COLPMf 


Player-missile 1 


W 


D014 53268 


02C2 


706 


C0LPM2 


Player- missile 2 


w 


DO 15 53269 


02C3 


707 


COLPM3 


Player- missile 3 


w 


DO 16 53270 


02C4 


708 


COLPFO 


Playfield 


w 


D017 53271 


02C5 


709 


COLPF1 


Playfield 1 


w 


D018 53272 


02C6 


710 


COLPF2 


Playlield 2 


w 


D019 53273 


□2C7 


711 


COLPF3 


Playfield 3 


w 


001 A 53274 


02C8 


712 


COLBK 


Playfield background 


w 


SOUND: 












D200 53760 






AUDF1 


Channel 1 Frequency 


w 


D201 53761 






AUDC1 


Channel 1 Control 


w 


D202 53762 






AUDF2 


Channel 2 Frequency 


w 


D203 53763 






AUDC2 


Channel 2 Control 


w 


D204 53764 






AUDF3 


Channel 3 Frequency 


w 


D205 53765 






AUDC3 


Channel 3 Control 


w 


D206 53766 






AUDF4 


Channel 4 Frequency 


w 


D207 53767 






AUDC4 


Channel 4 Control 


w 


D208 53768 






AUDCTL 


Audio Control 


w 


PLAYERS AND MISSILES 








D000 53248 






HPOSPO 


Horlz. pos. Player 


w 


D001 53249 






HPOSP1 


Horlz. pos. Player 1 


w 


D002 53250 






HPOSP2 


Horiz. pos. Player 2 


w 


D003 53251 






HPOSP3 


Horiz. pos. Flayer 3 


w 


D004 53252 






HPOSMO 


Horiz. pos. Missile 


w 


D005 53253 






HPOSM1 


Horiz. pos. Missiie 1 


w 


D006 53254 






HPOSM2 


Horiz. pos. Missile 2 


w 


D007 53255 






HPOSM3 


Horiz. pos. Missile 3 


w 


D008 53256 






SIZEPO 


Size of Player 


w 


D009 53257 






SIZEP1 


Size of Player 1 


w 


DOOA 53258 






SIZEP2 


Size of Player 2 


w 


DOOB 53259 






SIZEP3 


Size of Player 3 


w 


DOOC 53260 






SIZEM 


Size of all Missiles 


w 


D407 54279 






PMBASE 


Player-missile base 


w 


CHARACTERS: 










D401 54273 


02F3 


755 


CHACT1. 


Character control 


w 


D404 54276 






HSCROL 


Horizontal scroll 


w 


D405 54277 






VSCROL 


Vertical scroll 


w 


D409 54281 


02F4 


756 


CKBAS 


Character set base 


w 


CONTROL REGISTERS: 








D01B 53275 


026F 


623 


PRIOR 


Priority Select 


w 


D01D 53277 






GRACTL 


Graphics control 


w 


D20E 53774 


0010 


016 


IRQEN 


IRQ enable 


w 


D402 54274 


0230 


559 


DLISTL 


Display lisi pir., iow 


w 


D403 54275 


0231 


560 


DLISTH 


Display list ptr., high 


w 


D40E 54286 






NMIEN 


Non-maskable int. enabi 


-W 



Address 


Shadow 




(R)ead 


or 


Hex Dec 


Hex 


Dec 


Name 


Description (W)rtte 


GAME CONTROLLER PORTS: 






D010 53264 


0284 


644 


TRIGO 


Joystick trigger 


R 


D011 53265 


0285 


645 


TRIG1 


Joystick trigger 1 


R 


D012 53266 


0286 


646 


TRIG2 


Joystick trigger 2 


R 


D013 53267 


0287 


647 


TRIG3 


Joystick trigger 3 


R 


D200 53760 


0270 


624 


POT0 


Paddle 


R 


D201 53761 


0271 


625 


POT1 


Paddle 1 


R 


D202 53762 


0272 


626 


POT2 


Paddle 2 


R 


D203 53763 


0273 


627 


POT3 


Paddle 3 


R 


D204 53764 


0274 


628 


POT4 


Paddle 4 


R 


D205 53765 


0275 


629 


POT5 


Paddle 5 


R 


D206 53766 


0276 


630 


POT6 


Paddle 6 


R I 


D207 53767 


0277 


631 


POT7 


Paddie 7 


H ' 


D208 53768 






ALLPOT 


Pot port state 


R 


D20B 53771 






POTGO 


Start pot scan 


W 


D300 54016 


0278 


632 


PORTA 


STICK0 


H 




0279 


633 


PORTA 


ST1CK1 


R 


D300 54016 






PORTA 


Direction register 


W 


D301 54017 


0280 


634 


PORTB 


3TICK2 


R 




0281 


635 


PORTB 


STICK3 


R 


D301 54017 






PORTB 


Direction register 


W 


D302 54018 






PACTL 


Port A control 


W 


D303 54019 






PBCTL 


Port B control 


w 


MISCELLANEOUS: 










D01F 53279 






CONSOL 


Consol switches 


R 


D01F 53279 






CONSOL 


Keyboard speaker 


W 


D20A 53770 






RANDOM random number gen. 


R 


D20F 53775 


0232 


562 


SKCTL 


Serial pOrt control 


W 


D40B 54283 






VCOUNT 


Vertical line counter 


R 


D40C 54284 


0234 


564 


PENH 


Light pen horiz. ios. 


R 


D40D 54285 


0235 


565 


PENV 


Light pen vert. pos. 


R 



Collision Registers for Players and Missiles 



D000 


53248 


M0PF 


Missile 


- playfield 


R 


D001 


53249 


M1PF 


Missile 1 


- playfield 


R 


D002 


53250 


M2PF 


Missile 2 


• playfield 


R 


D003 


53251 


M3PF 


Missile 3 


- playfield 


R 


D004 


53252 


P0PF 


Player ■ 


playfield 


R 


D0O5 


53253 


PTPF 


Play9r 1 - 


playfield 


R 


D006 


53254 


P2PF 


Player 2 - 


playfield 


R 


D007 


53255 


P3PF 


Piayer 3 ■ 


playfield 


R 


D008 


53256 


M0PL 


Missile 


- player 


R 


D008 


53257 


M1PL 


Missile 1 


- player 


R 


DOOA 


53258 


M2PL 


Missiie 2 


- piayer 


R 


DOOB 


53259 


M3PL 


Missile 3 


- player 


R 


DOOC 


53260 


P0PL 


Player 


player 


R 


D00D 


53261 


P1PL 


Player 1 


player 


R 


D00E 


53262 


P2PL 


Player 2 ■ 


player 


R 


DQOF 


53263 


P3PL 


Player 3 ■ 


player 


R 
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NATIONAL 

ADVERTISING 

REPRESENTATIVES 



WEST COAST 

The R.W. Walker Co., Inc. 
2716 Ocean Park Boulevard 
Suite 1010 

Santa Monica, California 90405 
(213) 450-9001 

serving: Washington, Oregon, Idaho, Montana, Wyom- 
ing, Colorado, New Mexico, Arizona, Utah, Nevada, 
California, Alaska, and Hawaii (also British Columbia 
and Alberta, Canada). 



MIDDLE ATLANTIC AND 
SOUTHEASTERN STATES 



Dick Busch Inc. 
Richard V. Busch 

6 Douglass Dr., R.D. #4 
Princeton, NJ 08540 
(201) 329-2424 



Eleanor M. Angone 

74 Brookline 

E.Atlantic Beach, NY 11561 

(516) 432-1955 



serving: New York, Pennsylvania, New Jersey, Dela- 
ware, Maryland, West Virginia, Virginia, D.C., North 
Carolina, South Carolina, Louisianna, Tennessee, Mis- 
sissippi, Alabama, Georgia, and Florida. 



NEW ENGLAND AND 
ALL OTHER TERRITORIES 

Kevin B. Rushalko 

Peterboro, New Hampshire 03458 
(603) 547-2970 

serving: Maine, New Hampshire, Vermont, Massachu- 
setts, Rhode Island, Connecticut, Ohio, Kentucky, Okla- 
homa, Arkansas, and Texas (also any other territories 
not listed above). 



ADVERTISING MANAGER 

Cathi Bland 
address materials directly to: 
MICRO INK, Advertising 
34 Chelmsford Street 
Chelmsford, Massachusetts 01824 
(617)256-5515 



Advertiser's Index 



Aardvark Technical Services, Ltd 18 

ABM Products .' 98 

Advanced Operating Systems 17 

Anthro-Digital Software 8 

Apex Co 84 

Apple Tree Electronics 29 

Ark Computing 47 

Artsci, Inc IPC 

Aurora Software Associates 21 

Bedford Micro Systems. . . .8 

CGRS Microtech 24 

Cleveland Consumer Computer Components 107 

Collegiate Microcomputer 77 

Computech 15 

Computer Case Co 107 

Computer Mail Order 64-65 

Computer Marketing Service 78 

Computer Science Engineering 104 

Datamost 33, 34, 90, 92 

Decision Systems 101 

Digicom Engineering, Inc 68 

Digital Acoustics 12 

D&N Micro Products, Inc 69 

Eastern House Software 61 

Excert, Inc 48 

Execom Corp 101 

Genesis Information Systems Inc 39 

Gimix, Inc 1 

Hudson Digital Electronics Inc 40 

Interesting Software 73 

Kilo Corp 54 

Leading Edge Electronics BC 

Logical Devices 95 

Lyco Corp 58 

MICRObits (Classifieds) 28, 30, 31 

MICRO INK 32, 82, 84 

Micro Motion 68 

Microsoft Consumer Products IBC 

Micro-Ware Distributing Inc 102 

M.M.S 76 

Modular Systems 77 

Olympic Sales Co 21 

Optimal Technology 95 

Orion Software 6 ■ 

PEEK(65) 73 

Perry Peripherals 39 

Pretzelland 37 

Pterodactyl Software 102 

Quentin Research 52 

R C Electronics 71 

Sensible Software 89 

SGC 25 

6502 Program Exchange 85 

Skyles Electric Works 74 

Softel 100 

Softronics 4 

Software Farm 91 

Spectrum Systems 98 

Star Micronics 26 

Tau Lambda 15 

Universal Data Research 104 

Versa Computing, Inc 22 

Victory Software 1 1 

Voicetek, Inc 63 

John Wiley & Sons 2 

XPS, Inc 104 

MICRO INK is not responsible for claims made by its advertisers Any 
complaint should be submitted directly to the advertiser. Please also send 
written notification to MICRO. 
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Next Month in MICRO 



Commodore Feature 

• SuperPET's Waterloo ASCII Character Set — A 

description of the ASCII character set used in the 
Waterloo interpreters supplied with the SuperPET. 

• BASIC Squeeze — A routine to squeeze out 
imbedded blanks, line separators, and comments 
for a BASIC program. 

• Microcomputers in the Chemical Engineering 
Curriculum, Part 2 — Analog transducers in a 
digital world. 

• Add a BASIC Line Delete Command — A 

BASIC line delete command allows the user to 
delete blocks of BASIC program lines at the touch 
of a single key. The article shows how to 
implement this command, in machine language, 
on Commodore computers, including the VIC-20. 

• SOUP — An efficient compare program for 
machine-language program files on Commodore 
disk; Uses BASIC 4.0 disk commands, but is 
otherwise compatible with other Microsoft 
BASICS. 



• It's All Relative — CBM Disk Techniques, Part 

1 — An explanation of how to get the most from 
CBM's powerful disk operating system. Examples 
are drawn from a well-written mailing list 
package. 

• VIC Jitter Fixer — Add this routine to your 
programs to help get reliable readings from your 
VIC paddle, joystick, and light pen registers. 

And more... 

BASIC Macro Function for Cursor Control 

on the OSI 
Applesoft GOTO/GOSUB Checking Routine 
Logic Instructions of the 68000 
Atari Graphics 



New Columns! 

CoCo Bits — for the Color Computer 
From Here to Atari returns 



20% OFF 



Your money goes farther when you sub- 
scribe. During the course of a year, when you 
subscribe, you save 20% (in the U.S.). 

Pay only $24.00 ($2.00 a copy) for 12 monthly 
issues of MICRO sent directly to your home or 
office in the U.S. 



More MICRO for Less Money 
When You Subscribe 

But on the newsstand — if you can locate the 
issue you want — you pay $30.00 a year ($2.50 
a copy). 

Special Offer — Subscribe for 2 years ($42.00) 
and get 30% off the single issue price. 

Subscribe to MICRO today. 



MICRO 

34 Chelmsford Street 
P.O. Box 6502 
Chelmsford, MA 01824 

Please send me MICRO for t year 2 years 

NOTE: Airmail subscriptions accepted for 1 year only. 



Subscription Rates Effective January 1, 1982 
Country Rate 



Check enclosed $_ 
Charge my _ 



VISA account 
Mastercard account 



No. 



United States 

Foreign surface mail 

Europe (air) 

Mexico, Central America, Mid East 

N. & C. Africa 
South Am., S. Afr., Far East, 

Australasia, New Zealand 



$24.00 1 yr. 
42.00 2 yr. 
27.00 
42.00 

48.00 

72.00 



Expiration date . 
Name 



* Airmail subscriptions accepted for only 1 year. 
For U.S. and Canadian 2-year rates, multiply by 2. 



Address 



City/State: 



Job Title: 



.Zip 



Type of Business/Industry: . 
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Turn your Apple into the world's 
most versatile personal computer. 



The SoftCard™ Solution. SoftCard 
turns your Apple into two computers. 
A Z-80 and a 6502. By adding a Z-80 
microprocessor and CP/M to your 
Apple, SoftCard turns your Apple into 
a CP/M based machine. That means 
you can access the single largest body 
of microcomputer software in exist- 
ence. Two computers in one. And, the 
advantages of both. 

Plug and go. The SoftCard system 
starts with a Z-80 based circuit card. 
Just plug it into any slot (except 0) of 
your Apple. No modifications required. 
SoftCard supports most of your Apple 
peripherals, and, in 6502-mode, your 
Apple is still your Apple. 

CP/M for your Apple. You get CP/M 
on disk with the SoftCard package. It's 
a powerful and simple-to-use operating 
system. It supports more software 
than any other microcomputer operat- 
ing system. And that's the key to the 
versatility of the SoftCard/Appie. 



BASIC included. A powerful tool, 
BASIC-80 is included in the SoftCard 
package. Running under CP/M, ANSI 
Standard BASIC-80 is the most 
powerful microcomputer BASIC 
available. It includes extensive disk I/O 
statements, error trapping, integer 
variables, 16-digit precision, exten- 
sive EDIT commands and string func- 
tions, high and low-res Apple graphics, 
PRINT USING, CHAIN and COM- 
MON, plus many additional com- 
mands. And, it's a BASIC you can 
compile with Microsoft's BASIC 
Compiler. 

More languages. With SoftCard and 
CP/M, you can add Microsoft's ANSI 
Standard COBOL, and FORTRAN, or 



Basic Compiler and Assembly Lan- 
guage Development System. All, more 
powerful tools for your Apple. 
Seeing is believing. See the SoftCard 
in operation at your Microsoft or Apple 
dealer. We think you'll agree that the 
SoftCard turns your Apple into the 
world's most versatile persona! 
computer. 

Complete information? It's at your 
dealer's now. Or, we'll send it to you 
and include a dealer list. Write us. Call 
us. 



SoftCard is a trademark of Microsoft Apple II and 
Apple II Plus are registered trademarks of Apple 
Computer. Z-80 is a registered trademark of Zilog, 
Inc. CP/M is a registered trademark of Digital 
Research. Inc. 



AHCPQBOfT 

V CONSUMER^ PRODUCTS f 

MICROSOFT Inc. 
10700 Northup Way • Bellevue, WA 98004 






THE PROWRFTER COMETH. 




(And It Cometh On Like Gangbusters.) 



Evolution. 

It's inevitable. An eternal 
verity. 

Just when you think you've 
got it knocked, and you're 
resting on your laurels, some- 
body comes along and makes 
a dinosaur out of you. 

Witness what happened to 
the Centronics printer when 
the Epson MX-80 came along 
in 1981. 

And now, witness what's 
happening to the MX-80 as 
the ProWriter cometh to be 
the foremost printer of the 
decade. 
SPEED 

MX-80: 80 cps, for 46 full lines 
per minute throughput. 
PROWRITER: 120 cps, for 
63 full lines per minute 
throughput. 
GRAPHICS 
MX-80: Block graphics 
standard, fine for things like 
bar graphs. 

PROWRITER: High-resolu- 
tion graphics features, fine 
for bar graphs, smooth curves, 
thin lines, intricate details, etc. 
PRINTING 

MX-80: Dot matrix business 
quality. 

PROWRITER: Dot matrix 
correspondence quality, with 
incremental printing capability 
standard. 
FEED 

MX-80: Tractor feed standard; 
optional friction-feed kit for 
about $75 extra. 
PROWRITER: Both tractor 
and friction feed standard. 
INTERFACE 
MX-80: Parallel interface 
standard; optional serial 
interface for about $75 extra. 
PROWRITER: Parallel and 
serial interface standard. 
WARRANTY 

MX-80: 90 days, from Epson. 
PROWRITER: One full year, 
from Leading Edge. 
PRICE 
Heh, heh. 

Distributed Exclusively by Leading 
Edge Products, Inc., 225 Turnpike - 
Street, Canton, Massachusetts 
02021. Call: toll-free 1-800-343-6833; 
or in Massachusetts call collect 
(6171 828-8150 Telex 951-624. 

LEADING 
EDGE. 

For a free poster of "Ace " 
fProwriter's pilot) doing his thing, 
please write us. 



